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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 100052 - (show annotations)
Fri Mar 24 18:35:58 2017 UTC (2 years, 9 months ago) by alexk
File size: 709 byte(s)
Added an example that demonstrates an issue with detecting a dirty processor resulted from a failing object creation.
1 class TEST
2
3 create
4 make,
5 make_exception
6
7 feature {NONE} -- Creation
8
9 make
10 -- Run the test.
11 local
12 t: separate TEST
13 is_retried: BOOLEAN
14 do
15 if is_retried then
16 io.put_string ("OK")
17 else
18 -- Raise an exception in a separate creation procedure.
19 create t.make_exception
20 -- Access the object that failed to complete its creation.
21 -- This should trigger an exception in the caller as soon as the call is a query.
22 separate t as s do
23 io.put_integer (s.item)
24 end
25 end
26 io.put_new_line
27 rescue
28 is_retried := True
29 retry
30 end
31
32 make_exception
33 -- Initialize object.
34 do
35 check False then end
36 end
37
38 feature -- Access
39
40 item: INTEGER
41 -- Value.
42
43 end

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23