source: to-imperative/trunk/java/refal/refal/plus/StdIO.rfi @ 3658

Last change on this file since 3658 was 3658, checked in by yura, 13 years ago
  • Refal StdIO
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 1006 bytes
Line 
1// $Id: StdIO.rfi 3658 2008-03-31 15:03:42Z yura $
2
3$module "refal.plus.StdIO";
4
5$channel StdIn StdOut StdErr;
6
7$func  Channel      = s.Channel;
8$func? OpenFile     s.Channel e.FileName s.Mode = ;
9$func  CloseChannel s.Channel = ;
10
11$func ParseFileName e.FileName = s.DriveWord s.PathWord s.NameWord s.ExtWord;
12$func? EraseFile    e.FileName = ;
13
14$func? IsEof        s.Channel = ;
15
16$func? Read     = t.Term;
17$func? ReadChar = s.Char;
18$func? ReadLine = e.Char;
19$func  Write   e.Expr = ;
20$func  WriteLn e.Expr = ;
21$func  Print   e.Expr = ;
22$func  PrintLn e.Expr = ;
23
24$func? ReadCh     s.Channel = t.Term;
25$func? ReadCharCh s.Channel = s.Char;
26$func? ReadLineCh s.Channel = e.Char;
27$func  WriteCh    s.Channel e.Expr = ;
28$func  WriteLnCh  s.Channel e.Expr = ;
29$func  PrintCh    s.Channel e.Expr = ;
30$func  PrintLnCh  s.Channel e.Expr = ;
31$func  Flush      s.Channel = ;
32
33$func? PrimOpenFile s.channel e.file s.mode = ;
34$func  PrimCloseChannel s.channel = ;
35
36$func? PrimRead s.channel s.n = e.chars;
37
38//FIXME: should be a box?
39$const ReadChunkSize = 64;
Note: See TracBrowser for help on using the repository browser.