aboutsummaryrefslogtreecommitdiffhomepage
path: root/parsing
diff options
context:
space:
mode:
Diffstat (limited to 'parsing')
-rw-r--r--parsing/compat.ml42
-rw-r--r--parsing/tok.mli1
2 files changed, 2 insertions, 1 deletions
diff --git a/parsing/compat.ml4 b/parsing/compat.ml4
index 0e416fe32..c482c694e 100644
--- a/parsing/compat.ml4
+++ b/parsing/compat.ml4
@@ -276,7 +276,7 @@ ELSE
module Gramext = G
let stoken tok = match tok with
| Tok.KEYWORD s -> Gramext.Skeyword s
- | tok -> Gramext.Stoken ((=) tok, G.Token.to_string tok)
+ | tok -> Gramext.Stoken (Tok.equal tok, G.Token.to_string tok)
END
IFDEF CAMLP5_6_00 THEN
diff --git a/parsing/tok.mli b/parsing/tok.mli
index 416ce468e..54b747952 100644
--- a/parsing/tok.mli
+++ b/parsing/tok.mli
@@ -20,6 +20,7 @@ type t =
| BULLET of string
| EOI
+val equal : t -> t -> bool
val extract_string : t -> string
val to_string : t -> string
(* Needed to fit Camlp4 signature *)