summaryrefslogtreecommitdiff
path: root/Parse.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Parse.hs')
-rw-r--r--Parse.hs13
1 files changed, 12 insertions, 1 deletions
diff --git a/Parse.hs b/Parse.hs
index 769a883..484342f 100644
--- a/Parse.hs
+++ b/Parse.hs
@@ -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 ' '