Changeset 4 for src/Parser.hs

Timestamp:

02/06/05 20:01:10 (4 years ago)

Author:

autrijus

svk:copy_cache_prev:

1041

Message:

* This be 6.0.0.

Files:

• src/Parser.hs (modified) (3 diffs)

src/Parser.hs

@@ -11 +11 @@
 
 module Parser where
+import Internals
 import AST
 import Lexer
-import Text.ParserCombinators.Parsec
-import Text.ParserCombinators.Parsec.Expr
 
 type StateParser a = GenParser Char () a
@@ -37 +36 @@
     , ternOps  [("??", "::")]                           -- Ternary
     , leftOps  " = := ::= += **= xx= "                  -- Assignment
+    -- XXX rewrite chained Ops using sepBy!
     , rightOps " , "                                    -- List Item Separator
     , preOps   primitiveListFunctions                   -- List Operator
@@ -71 +71 @@
 parseTerm = parens parseOp
     <|> parseLit
-    <|> nonTerm
+--  <|> nonTerm
     <?> "term"