purescript 0.1.6 → 0.1.7

raw patch · 3 files changed

+3/−3 lines, 3 files

Files

• purescript.cabal +1/−1
• src/Language/PureScript/Parser/Values.hs +1/−1
• src/Language/PureScript/Pretty/Values.hs +1/−1

@@ -1,5 +1,5 @@ name: purescript-version: 0.1.6+version: 0.1.7 cabal-version: >=1.8 build-type: Simple license: MIT

@@ -136,7 +136,7 @@                 , Prefix $ C.lexeme (P.try $ C.indented *> C.reservedOp "+") >> return id ]               ] ++ customOperatorTable user ++               [ [ Infix (C.lexeme (P.try (C.indented *> C.parseIdentInfix P.<?> "operator") >>= \ident -> return $ \t1 t2 -> App (App (Var ident) [t1]) [t2])) AssocLeft ]-              , [ Infix (C.lexeme (P.try $ C.indented *> C.reservedOp "!") >> return (flip Indexer)) AssocRight ]+              , [ Infix (C.lexeme (P.try $ C.indented *> C.reservedOp "!!") >> return (flip Indexer)) AssocRight ]               , [ Infix (C.lexeme (P.try $ C.indented *> C.reservedOp "<=") >> return (Binary LessThanOrEqualTo)) AssocRight                 , Infix (C.lexeme (P.try $ C.indented *> C.reservedOp ">=") >> return (Binary GreaterThanOrEqualTo)) AssocRight ]               , [ Infix (C.lexeme (P.try $ C.indented *> C.reservedOp "<") >> return (Binary LessThan)) AssocRight

@@ -113,7 +113,7 @@                   , [ Wrap app $ \args val -> val ++ "(" ++ args ++ ")" ]                   , [ Split lam $ \args val -> "\\" ++ intercalate ", " args ++ " -> " ++ prettyPrintValue val ]                   , [ Wrap ifThenElse $ \(th, el) cond -> cond ++ " ? " ++ prettyPrintValue th ++ " : " ++ prettyPrintValue el ]-                  , [ AssocR indexer (\index val -> val ++ " ! " ++ index) ]+                  , [ AssocR indexer (\index val -> val ++ " !! " ++ index) ]                   , [ binary    LessThan             "<" ]                   , [ binary    LessThanOrEqualTo    "<=" ]                   , [ binary    GreaterThan          ">" ]