source:
to-imperative/trunk/samples/Syntax/assign5.rf
@
1607
| Last change on this file since 1607 was 1607, checked in by orlov, 16 years ago | |
|---|---|
|
|
| File size: 121 bytes | |
| Line | |
|---|---|
| 1 | $use StdIO; |
| 2 | |
| 3 | $func XYZ = s; |
| 4 | XYZ = XYZ; |
| 5 | |
| 6 | Main = |
| 7 | (ABC) () $iter (<XYZ>) (e1 e2) :: (e1) (e2), |
| 8 | e2 : v = |
| 9 | <WriteLN e2>; |
Note: See TracBrowser
for help on using the repository browser.
