source:
to-imperative/trunk/samples/Syntax/trap6.rf
@
2383
| Last change on this file since 2383 was 2383, checked in by orlov, 14 years ago | |
|---|---|
|
|
| File size: 118 bytes | |
| Line | |
|---|---|
| 1 | $use StdIO; |
| 2 | |
| 3 | Main = |
| 4 | $trap $error X $with { |
| 5 | s1, $trap $error Y $with \{}; |
| 6 | e1 = <PrintLN "Catched: "e1>; |
| 7 | }; |
Note: See TracBrowser
for help on using the repository browser.
