Tiny changes, made note of bug in SPL.

[jars.git] / parser.scm

diff --git a/parser.scm b/parser.scm
index f116033..c112cf9 100644 (file)
--- a/parser.scm
+++ b/parser.scm
@@ -15,7 +15,7 @@
           (newline-irx (irregex "^\n"))
           (comma-irx (irregex "^,"))
           (period-irx (irregex "^\\."))
-          (redcode-irx (irregex "^;redcode\n"))
+          (redcode-irx (irregex "^;redcode.*\n"))
           (name-start-irx (irregex "^;[ \t]*name "))
           (name-irx (irregex "^[^\n]*"))
           (author-start-irx (irregex "^;[ \t]*author "))