source: to-imperative/trunk/samples/Syntax/clash1.rf

Last change on this file was 4085, checked in by yura, 11 years ago
  • To new syntax. Three files are have errors still.
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 193 bytes
Line 
1$use Convert StdIO;
2
3$func? Eq (e1) (e2) = ;
4
5Eq (e1) (e2) = e1 : e2;
6
7$func Main = e;
8Main =
9  <ToChars ABC> :: e1,
10  <ToChars ABC> :: e2,
11  e1 : e2,
12  <Eq ((e1)) ((e2))>,
13  <PrintLn "OK!">;
14
Note: See TracBrowser for help on using the repository browser.