Mercurial > repos > rhope
view compile.rhope @ 158:0e06f29aa83d
Small tweak to String Cat balance
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Thu, 23 Dec 2010 16:16:31 -0500 |
parents | 0a4682be2db2 |
children |
line wrap: on
line source
Import lex.rhope Import countstring.rhope Import parse.rhope Main[args] { [args]Index[1] { Print[["Parsing "]Append[~]] file <- [File[~]]Open["r"] data <- String[[file]Read[[file]Length]] tokens <- Lex[Count String[data]] Print[Parse[tokens], ""] }{ Print["Usage: rhope compile.rhope <filename>"] } }