b571124 · elk · git.iko.soy

Another change for the 'Str' data constructor.

commitb5711243f10cf37c370d3de508ebd809ca74718b authorevancz <info@elm-lang.org> dateSun 20 May 2012, 01:12 (14 years ago) parentc00d017

1 file changed+1−1

unifiedsplit

src/Parse/Parser.hs+1−1

@@ -18,7 +18,7 @@ import Types (Type (VarT))

1818numTerm = do { whitespace; t <- item

1919 ; case t of { NUMBER n -> return $ Number n; _ -> zero } }

2020strTerm = do { whitespace; t <- item

21− ; case t of { STRING cs -> return . list $ map Chr cs

21+ ; case t of { STRING cs -> return $ Str cs

2222 ; _ -> zero } }

2323

2424varTerm = Var `liftM` var