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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 102390 - (show annotations)
Fri Nov 2 18:05:52 2018 UTC (10 months, 2 weeks ago) by alexk
File size: 660 byte(s)
Added an example for bug#19490.
1 class
2 TEST
3
4 create
5 make
6
7 feature {NONE} -- Creation
8
9 make
10 local
11 i: TYPED_POINTER [TYPED_POINTER [INTEGER]]
12 do
13 report (not attached {REAL_64} default_pointer, 1)
14 report (attached {TYPED_POINTER [TYPED_POINTER [INTEGER]]} i, 2)
15 report (not attached {TYPED_POINTER [TYPED_POINTER [POINTER]]} i, 3)
16 end
17
18 feature {NONE} -- Output
19
20 report (is_passing: BOOLEAN; number: NATURAL_8)
21 -- Report whether a test identified by `number` passes according to `is_passing`.
22 do
23 io.put_string ("Test #")
24 io.put_natural_8 (number)
25 io.put_string
26 (if is_passing then
27 ": OK"
28 else
29 ": Failed"
30 end)
31 io.put_new_line
32 end
33
34 end

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23