some small fixes

[cc1516.git] / spl.icl

diff --git a/spl.icl b/spl.icl
index f398f90..28b95fb 100644 (file)
--- a/spl.icl
+++ b/spl.icl
@@ -69,7 +69,7 @@ Start w
                        printTokens :: [Token] -> String
                        printTokens ts = concat $ flatten $ map pt ts
                                where
-                                       pt ({line,col},token) = [toString line, ":", 
+                               pt ({line,col},token) = [toString line, ":", 
                                                toString col, ": ", printToString token, "\n"]
 
 parseArgs :: *World -> (Opts, *World)