Mercurial > repos > rhope
view compile.rhope @ 77:a748300a4143
Some untested progress on String
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Thu, 08 Jul 2010 09:57:16 -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>"] } }