-function readPattern(pattern::Regex)
- m = match(pattern, currentLine)
- pos += length(m.match)
- return m.match
+readSpaces() = readPattern(r"^([ \t]*)")
+readWord() = readPattern(r"^([^\s]+)")
+readNewline() = readPattern(r"^(\n)")
+readRestOfLine() = readPattern(r"^([^\n]*)")
+
+word = ""
+function getWordOrNewline()
+ global word = readWord()
+ if word == ""
+ global word = readNewline()
+ end