source: to-imperative/trunk/java/refal/refal/plus/Convert.rf @ 3615

Last change on this file since 3615 was 3615, checked in by yura, 13 years ago
  • Java are splited into two packages: onlu java libraries are in refal.plus, refal+java libraries in refal.plus.internal.
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 434 bytes
Line 
1$use "Lexer";
2$use "Stream";
3$use "refal.plus.internal.Convert";
4
5CharsToBytes e.Char = <"internal.Convert.CharsToBytes" e.Char>;
6BytesToChars e.Int  = e.Char;
7ToLower      e.Char = e.Char;
8ToUpper      e.Char = e.Char;
9
10ToInt   e.Exp = s.Int;
11ToChars e.Exp = e.Char;
12ToWord  e.Exp = s.Word;
13
14Read_Expr expr =
15  <Expr_Open <ToChars expr>> :: stream,
16  $iter e.res <IsRead_Term stream> :: e.res,
17  <IsEnd_of_Stream stream> =
18  e.res;
19
Note: See TracBrowser for help on using the repository browser.