diff options
Diffstat (limited to 'src/cgil/rlhc-main.lm')
-rw-r--r-- | src/cgil/rlhc-main.lm | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/src/cgil/rlhc-main.lm b/src/cgil/rlhc-main.lm new file mode 100644 index 00000000..f9abea7e --- /dev/null +++ b/src/cgil/rlhc-main.lm @@ -0,0 +1,19 @@ +InputFile: str = argv->pop() +OutputFile: str = argv->pop() + +# +# Open input and parse +# +Input: stream = open( InputFile, "r" ) +parse Start: start[ Input ] +if ( !Start ) { + print( error, '\n' ) + exit(1) +} + +# +# Translate +# +Output: stream = open( OutputFile, "w" ) +trans( Output, Start ) + |