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

Last change on this file since 3616 was 3616, checked in by yura, 13 years ago
  • Bug: refal+ compiler read only class files in Container. But does not read in Library and output folder.
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 595 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  = <"internal.Convert.BytesToChars"  e.Int>;
7ToLower e.Char = <"internal.Convert.ToLower" e.Char>;
8ToUpper e.Char = <"internal.Convert.ToUpper" e.Char>;
9
10ToInt e.Exp = <"internal.Convert.ToInt" e.Exp>;
11ToChars e.Exp = <"internal.Convert.ToChars" e.Exp>;
12ToWord e.Exp = <"internal.Convert.ToWord" e.Exp>;
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.