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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 73121 - (show annotations)
Sun Apr 20 14:38:33 2008 UTC (11 years, 4 months ago) by tedf
File size: 415 byte(s)
Added test to show the behavior that ROUTINE_FAILURE is not raised when prior exception was raised in rescue clause.
1 class TEST
2
3 inherit
4 EXCEPTIONS
5 create
6 make
7
8 feature {NONE}
9
10 make
11 local
12 l_retried: BOOLEAN
13 l_dev: ROUTINE_FAILURE
14 do
15 if not l_retried then
16 test
17 end
18 rescue
19 print (tag_name); io.put_new_line
20 l_dev ?= exception_manager.last_exception
21 print (l_dev = Void); io.put_new_line
22 l_retried := True
23 retry
24 end
25
26
27 test
28 do
29 raise ("Test")
30 rescue
31 raise ("Test rescue")
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