(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 "))