Mercurial > repos > rhope
annotate compile.rhope @ 164:429afd920a23
Allow sending and receiving arrays of arbitrary objects rather than just UInt8s
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Mon, 10 Jan 2011 00:25:35 -0500 |
parents | 0a4682be2db2 |
children |
rev | line source |
---|---|
2 | 1 Import lex.rhope |
2 Import countstring.rhope | |
3 Import parse.rhope | |
4 | |
5 Main[args] | |
6 { | |
7 [args]Index[1] | |
8 { | |
9 Print[["Parsing "]Append[~]] | |
131
0a4682be2db2
Modify lexer and new parser to work in compiler
Mike Pavone <pavone@retrodev.com>
parents:
2
diff
changeset
|
10 file <- [File[~]]Open["r"] |
0a4682be2db2
Modify lexer and new parser to work in compiler
Mike Pavone <pavone@retrodev.com>
parents:
2
diff
changeset
|
11 data <- String[[file]Read[[file]Length]] |
2 | 12 tokens <- Lex[Count String[data]] |
131
0a4682be2db2
Modify lexer and new parser to work in compiler
Mike Pavone <pavone@retrodev.com>
parents:
2
diff
changeset
|
13 Print[Parse[tokens], ""] |
2 | 14 }{ |
15 Print["Usage: rhope compile.rhope <filename>"] | |
16 } | |
17 } | |
131
0a4682be2db2
Modify lexer and new parser to work in compiler
Mike Pavone <pavone@retrodev.com>
parents:
2
diff
changeset
|
18 |