diff options
| -rw-r--r-- | parsing/tok.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/tok.ml b/parsing/tok.ml index 8ae1065120..f4b60aeec4 100644 --- a/parsing/tok.ml +++ b/parsing/tok.ml @@ -53,7 +53,7 @@ let to_string = function | INT s -> Format.sprintf "INT %s" s | STRING s -> Format.sprintf "STRING %S" s | LEFTQMARK -> "LEFTQMARK" - | BULLET s -> Format.sprintf "STRING %S" s + | BULLET s -> Format.sprintf "BULLET %S" s | EOI -> "EOI" let match_keyword kwd = function |