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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 89116 - (show annotations)
Wed Jul 11 18:20:52 2012 UTC (7 years, 2 months ago) by manus
File size: 581 byte(s)
Added an output to make sure that we do not crash before the program terminates properly.

1 class
2 TEST
3
4 inherit
5 EXECUTION_ENVIRONMENT
6
7 MEMORY
8
9 create
10 make
11
12 feature
13
14 make
15 local
16 t1, t2: WORKER_THREAD
17 i: INTEGER
18 s: STRING
19 do
20 create t1.make (agent execute)
21 create t2.make (agent execute)
22 t1.launch
23 t2.launch
24
25 from
26 i := 1
27 until
28 i = 100_000
29 loop
30 create s.make (100)
31 full_collect
32 i := i + 1
33 end
34 io.put_string ("Success")
35 io.put_new_line
36 end
37
38 execute
39 local
40 s: STRING
41 i: INTEGER
42 do
43 from i := 1 until i = 1000 loop
44 create s.make (100)
45 i := i + 1
46 end
47 sleep (10_000_000_000)
48 end
49
50 end

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23