1 files changed, 3 insertions, 0 deletions
diff --git a/Toks.hs b/Toks.hs
index c8ec567..3a27715 100644
--- a/Toks.hs
+++ b/Toks.hs
@@ -23,6 +23,9 @@ unmarkSpace ('.':s) = s
 unmarkSpace ('|':s) = s
 unmarkSpace _ = error "wat"
 
+space ('.':_) = True
+space _ = False
+
 split =
   unlines
     . map (concatMap escape . markSpace)