File tree Expand file tree Collapse file tree 1 file changed +3
-3
lines changed
Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Original file line number Diff line number Diff line change @@ -75,7 +75,7 @@ stringLit = unlines . \case
7575 " "
7676 ]
7777 " String" -> [" String literals //String// have the form" ,
78- " ``\" ``//x//``\" ``} , where //x// is any sequence of any characters" ,
78+ " ``\" ``//x//``\" ``, where //x// is any sequence of any characters" ,
7979 " except ``\" `` unless preceded by ``\\ ``." ,
8080 " " ]
8181 " Integer" -> [" Integer literals //Integer// are nonempty sequences of digits." ,
@@ -104,9 +104,9 @@ prtComments (xs,ys) = concat
104104 else
105105 " Single-line comments begin with " ++ sing ++ " ." ,
106106 if null xs then
107- " There are no multiple-line comments in the grammar."
107+ " There are no multiple-line comments in the grammar."
108108 else
109- " Multiple-line comments are enclosed with " ++ mult ++ " ."
109+ " Multiple-line comments are enclosed with " ++ mult ++ " ."
110110 ]
111111 where
112112 sing = List. intercalate " , " $ map (symbol. prt) ys
You can’t perform that action at this time.
0 commit comments