/[eiffelstudio]/trunk/eweasel/tests/free018/test.e
ViewVC logotype

Contents of /trunk/eweasel/tests/free018/test.e

Parent Directory Parent Directory | Revision Log Revision Log


Revision 101755 - (show annotations)
Sun May 20 10:56:07 2018 UTC (16 months ago) by alexk
File size: 548 byte(s)
Added tests for class features with assertions using unqualified calls.
1 class TEST
2
3 inherit
4 A
5 undefine
6 c1, e1
7 redefine
8 c2, e2
9 end
10
11 create
12 make
13
14 feature {NONE} -- Creation
15
16 make
17 -- Run test.
18 do
19 {TEST}.c1.do_nothing
20 {TEST}.c2.do_nothing
21 {TEST}.c3.do_nothing
22 {TEST}.e1
23 {TEST}.e2
24 {TEST}.e3
25 end
26
27 feature {TEST} -- Tests
28
29 a: BOOLEAN
30 do
31 Result := out /= "0"
32 end
33
34 c1: INTEGER_8 = 1
35
36 c2: INTEGER_8 = 2
37
38 c3: INTEGER_8 = 3
39
40 e1
41 external "C inline"
42 alias "return"
43 end
44
45 e2
46 external "C inline"
47 alias "return"
48 end
49
50 e3
51 external "C inline"
52 alias "return"
53 end
54
55 end

Properties

Name Value
svn:eol-style native
svn:keywords Author Date Id Revision

  ViewVC Help
Powered by ViewVC 1.1.23