source: to-imperative/trunk/samples/Syntax/clash6.rf @ 1142

Last change on this file since 1142 was 1142, checked in by orlov, 17 years ago
  • Test for iterative splitting from the right.
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 154 bytes
Line 
1$use StdIO;
2
3$func "++" eZ = (eX) (eA) (eY);
4
5"++" $r eP '+' eY,
6  eP : $l eX '+' eA =
7  (eX) (eA) (eY);
8
9Main = <WriteLN <"++" 'AAA+BBB+CCC+DDD+EEE'>>;
10
Note: See TracBrowser for help on using the repository browser.