Changeset 3924 for to-imperative


Ignore:
Timestamp:
Sep 18, 2008, 3:13:43 PM (12 years ago)
Author:
orlov
Message:
 
File:
1 edited

Legend:

Unmodified
Added
Removed
  • to-imperative/trunk/samples/fab.rf

    r3585 r3924  
    1010};
    1111
    12 Main = <PrintLn <Fab 'ABABA'('CA'('A'('AEA')'ADA'('EA'('A'))'AAA')'AC')'BA'>>;
     12Main =
     13        'ABABA'('CA'('A'('AEA')'ADA'('EA'('A'))'AAA')'AC')'BA' :: e1,
     14        <PrintLn e1>,
     15        <PrintLn <Fab e1> <Fab 'A'> (<Fab 'A'>)>;
Note: See TracChangeset for help on using the changeset viewer.