source: to-imperative/trunk/samples/Syntax/trap4.rf @ 1584

Last change on this file since 1584 was 1584, checked in by orlov, 16 years ago
  • Another test for $trap.
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 114 bytes
Line 
1$use StdIO;
2
3$func F = e;
4
5F = $error ABCD;
6
7Main =
8  $trap <F> $with {
9    err = <PrintLN "Catched: " err>;
10  };
Note: See TracBrowser for help on using the repository browser.