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

Annotation of /trunk/eweasel/tests/agent013/test.e

Parent Directory Parent Directory | Revision Log Revision Log


Revision 103061 - (hide annotations)
Sun Apr 7 06:55:59 2019 UTC (9 months, 1 week ago) by alexk
File size: 514 byte(s)
Updated ECFs to enable class removal optimization when a test involves finalization.
Updated source code to use contemporary routine type declarations.

1 manus 82134 class TEST
2    
3     create
4     make
5     feature
6    
7     make
8     local
9 alexk 103061 p: TEST_PROC
10 manus 82134 do
11     create p.make (agent (i: INTEGER) do io.put_integer (i); io.put_new_line end)
12     p.call ([]) -- OK in workbench and finalized modes
13     bar.call ([]) -- OK in workbench mode; fails in finalized mode
14     foo (p) -- OK in workbench mode; fails in finalized mode
15     end
16    
17 alexk 103061 bar: PROCEDURE
18 manus 82134 do
19 alexk 103061 create {TEST_PROC} Result.make (agent (i: INTEGER) do io.put_integer (i); io.put_new_line end)
20 manus 82134 end
21    
22 alexk 103061 foo (p: PROCEDURE)
23 manus 82134 do
24     p.call ([])
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