Changeset 1663


Ignore:
Timestamp:
Jan 12, 2005, 3:32:20 PM (16 years ago)
Author:
orlov
Message:
  • Function Put is now in the Box library.
File:
1 edited

Legend:

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

    r966 r1663  
    11$use Box StdIO;
    22
    3 $func Put s.box expr = s.box;
     3$func Put! s.box expr = s.box;
    44
    5 Put s.box expr = s.box <Store s.box <? s.box> expr>;
     5Put! s.box expr = s.box <Put s.box expr>;
    66
    7 Main = <PrintLN <? <Put <Box 'e^{i\\pi}'> ' = -1'>>>;
     7Main = <PrintLN <? <Put! <Box 'e^{i\\pi}'> ' = -1'>>>;
Note: See TracChangeset for help on using the changeset viewer.