Mercurial > repos > rhope
view compile.rhope @ 73:6a1a7d5cc2d9
Add some error checking, cleanup output and add a bad test file
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Sat, 19 Jun 2010 23:13:41 -0400 |
parents | 73e978d590c7 |
children | 0a4682be2db2 |
line wrap: on
line source
Import lex.rhope Import countstring.rhope Import parse.rhope Main[args] { [args]Index[1] { Print[["Parsing "]Append[~]] file <- <String@File[~] ,data <- [file]Get FString[[file]Length] tokens <- Lex[Count String[data]] Pretty Print[Parse[tokens], ""] }{ Print["Usage: rhope compile.rhope <filename>"] } }