source: to-imperative/trunk/java/refal/refal/plus/Serialize.rf @ 4013

Last change on this file since 4013 was 4013, checked in by orlov, 12 years ago
  • Experimental Serializable library. Doesn't work yet.
  • Property svn:eol-style set to native
File size: 550 bytes
Line 
1$module "refal.plus.Serialize";
2
3$public $func FileOutputStream e.fileName = s.stream;
4$native FileOutputStream = "java.io.FileOutputStream (java.lang.String)";
5
6$public $func ObjectOutputStream s.fileStream = s.objectStream;
7$native ObjectOutputStream = "java.io.ObjectOutputStream (java.io.FileOutputStream)";
8
9$public $func Write s.objectStream e.expr = ;
10$native Write = "void java.io.ObjectOutputStream.writeObject (java.io.ObjectOutputStream, java.lang.Object)";
11
12$func Main = e;
13Main = <Write <ObjectOutputStream <FileOutputStream 'x'>> 123>;
Note: See TracBrowser for help on using the repository browser.