1 files changed, 37 insertions, 0 deletions

diff --git a/eiffel-fragen/nachbedingung/application.e b/eiffel-fragen/nachbedingung/application.e
new file mode 100644
index 0000000..6babd0c
--- /dev/null
+++ b/eiffel-fragen/nachbedingung/application.e
@@ -0,0 +1,37 @@
+indexing
+        description : "nachbedingung application root class"
+        date        : "$Date: 2008-12-29 15:41:59 -0800 (Mon, 29 Dec 2008) $"
+        revision    : "$Revision: 76432 $"
+
+class
+        APPLICATION
+
+inherit
+        ARGUMENTS
+
+create
+        make
+
+feature {NONE} -- Implementation
+        ct: COUNTER
+        ch: CHILD
+
+feature {NONE} -- Initialization
+
+        make
+                        -- Run application.
+                do
+                        print ("nachbedingung%N")
+
+                        create ct
+                        ct.set(3)
+                        print ("ct " + ct.get().out + "%N")
+
+                        create ch
+                        ch.set(-2)
+                        print ("ch " + ch.get().out + "%N")
+
+                        print ("done%N")
+                end
+
+end