source:
to-imperative/trunk/samples/Syntax/block6.rf
@
2048
| Last change on this file since 2048 was 2048, checked in by orlov, 15 years ago | |
|---|---|
|
|
| File size: 178 bytes | |
| Line | |
|---|---|
| 1 | $use StdIO; |
| 2 | |
| 3 | $func F s = s; |
| 4 | F s1 = s1; |
| 5 | |
| 6 | Main = |
| 7 | <WriteLN A { B; } C>, |
| 8 | <WriteLN A { B <F 1>; } C>, |
| 9 | <WriteLN A { <F 1> <F 2>; } C>, |
| 10 | <WriteLN A ({ <F 1>; }) ({ <F 2>; }) C>; |
Note: See TracBrowser
for help on using the repository browser.
