Changes between Initial Version and Version 1 of Ticket #1027
- Timestamp:
- 09/21/09 00:34:10 (12 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
Ticket #1027 – description
initial v1 5 5 {{{ 6 6 .sub main :main 7 push_eh handler 8 test() 9 pop_eh 10 ## NB: This makes sure the sub call PC is sufficiently 11 ## different from the exception handler PC. 12 print "foo\n" 13 print "bar\n" 14 .return () 7 push_eh handler 8 test() 9 ## NB: This makes sure the sub call PC is sufficiently 10 ## different from the exception handler PC. 11 print "foo\n" 12 print "bar\n" 13 .return () 15 14 handler: 16 pop_eh 17 .local pmc exception 18 .local string message 19 .get_results (exception, message) 20 print "Error: " 21 print message 15 .local pmc exception 16 .local string message 17 .get_results (exception, message) 18 print "Error: " 19 print message 22 20 .end 23 21 24 22 .sub test 25 26 27 28 23 ## Throw an exception. 24 $P0 = new 'Exception' 25 $P0 = 'oops' 26 throw $P0 29 27 .end 30 28 }}}