parse.icl

   1 implementation module parse
   2
   3 import StdString
   4 import yard
   5
   6 import lex
   7
   8 parse :: LexerOutput -> ParserOutput
   9 parse (Left e) = Left ("Lexer error: " +++ e)
  10 parse (Right r) = Left "Parser not yet implemented"