diff options
author | Jed Barber <jjbarber@y7mail.com> | 2012-05-15 01:06:39 +1000 |
---|---|---|
committer | Jed Barber <jjbarber@y7mail.com> | 2012-05-15 01:07:55 +1000 |
commit | 19ca657d6b247c1acab1329ccf0c54d896178c87 (patch) | |
tree | cdd8d0440c1697b3d328f7f88bac1931dcac8bbc /Parse.hs | |
parent | 7a0eb21089bc60cf779469d04fe35632aec43f0e (diff) |
Fixed a number of compilation errors
Diffstat (limited to 'Parse.hs')
-rw-r--r-- | Parse.hs | 13 |
1 files changed, 12 insertions, 1 deletions
@@ -1,3 +1,14 @@ +module Parse ( + getLines, + stripReturn, + removeEscChars, + removeQuotes, + separateBy, + isComment, + isNumber, + isName + ) where + import Control.Monad( liftM ) import qualified Data.Char as Char @@ -22,7 +33,7 @@ removeQuotes :: String -> String removeQuotes = init . tail -separateBy :: String -> Char -> [String] +separateBy :: Char -> String -> [String] separateBy char list = let f = (\x -> if (x == char) then ' ' |