Changeset 3746 for to-imperative/trunk/java/refal/refal/plus/internal

Timestamp:

Apr 20, 2008, 2:35:18 PM (13 years ago)

Author:

yura

Message:

• Arguments name in RefalFormat?.

File:

• to-imperative/trunk/java/refal/refal/plus/internal/StdIO.rfi (modified) (2 diffs)

to-imperative/trunk/java/refal/refal/plus/internal/StdIO.rfi

@@ -12 +12 @@
 
 //$func  Channel      = s.Channel;
-$func? OpenFile     s.Channel e.FileName s.Mode = ;
-$func  CloseChannel s.Channel = ;
+$func? OpenFile     s.channel e.file s.mode = ;
+$func  CloseChannel s.channel = ;
 
 //$func ParseFileName e.FileName = s.DriveWord s.PathWord s.NameWord s.ExtWord;
 //$func? EraseFile    e.FileName = ;
 
-$func? IsEof        s.Channel = ;
+$func? IsEof        s.channel = ;
 
-$func? Read     = t.Term;
-$func? ReadChar = s.Char;
-$func? ReadLine = e.Char;
+$func? Read     = t.term;
+$func? ReadChar = s.char;
+$func? ReadLine = e.chars;
 //$func  Write   e.Expr = ;
 //$func  WriteLn e.Expr = ;
@@ -28 +28 @@
 //$func  PrintLn e.Expr = ;
 
-$func? ReadCh     s.Channel = t.Term;
-$func? ReadCharCh s.Channel = s.Char;
-$func? ReadLineCh s.Channel = e.Char;
+$func? ReadCh     s.channel = t.term;
+$func? ReadCharCh s.channel = s.char;
+$func? ReadLineCh s.channel = e.chars;
 //$func  WriteCh    s.Channel e.Expr = ;
 //$func  WriteLnCh  s.Channel e.Expr = ;