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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 102588 - (show annotations)
Thu Dec 13 05:27:19 2018 UTC (8 months, 1 week ago) by alexk
File size: 451 byte(s)
Extended test with test cases involving creation procedure calls (to cover bug#19437).
1 class TEST
2
3 create
4 make
5
6 feature {NONE} -- Creation
7
8 make
9 -- Run test.
10 local
11 c: CELL [BOOLEAN]
12 do
13 io.put_boolean (f) -- VUCR (feature call)
14 create c.put (f) -- VUCR (creation procedure call in a creation instruction)
15 ;(create {CELL [BOOLEAN]}.put (f)).do_nothing -- VUCR (creation procedure call in a creation expression)
16 c.do_nothing
17 ensure
18 instance_free: class
19 end
20
21 feature {NONE} -- Tests
22
23 f: BOOLEAN
24 do
25 end
26
27 end

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23