summaryrefslogtreecommitdiffstats
path: root/eiffel-fragen/replaceability/derived2.e
diff options
context:
space:
mode:
Diffstat (limited to 'eiffel-fragen/replaceability/derived2.e')
-rw-r--r--eiffel-fragen/replaceability/derived2.e28
1 files changed, 28 insertions, 0 deletions
diff --git a/eiffel-fragen/replaceability/derived2.e b/eiffel-fragen/replaceability/derived2.e
new file mode 100644
index 0000000..232ea6c
--- /dev/null
+++ b/eiffel-fragen/replaceability/derived2.e
@@ -0,0 +1,28 @@
1class
2 DERIVED2
3
4inherit
5 BASE
6 redefine add10 select add10
7 end
8 DERIVED
9 rename add10 as derived_add10
10 redefine myresult
11 end
12
13feature
14 add10(num: INTEGER): INTEGER
15 require else
16 -- stronger precondition
17 derived2_num_between_1_and_10: num >= 1 and num <= 10
18 do
19 RESULT := derived_add10(num)
20 ensure then
21 -- weaken postcondition
22 end
23
24 myresult: INTEGER
25 do
26 RESULT := 20
27 end
28end