aboutsummaryrefslogtreecommitdiff
path: root/grammar/q_util.ml4
diff options
context:
space:
mode:
Diffstat (limited to 'grammar/q_util.ml4')
-rw-r--r--grammar/q_util.ml41
1 files changed, 1 insertions, 0 deletions
diff --git a/grammar/q_util.ml4 b/grammar/q_util.ml4
index 19f436f926..76113ad509 100644
--- a/grammar/q_util.ml4
+++ b/grammar/q_util.ml4
@@ -56,6 +56,7 @@ let mlexpr_of_token = function
| Tok.IDENT s -> <:expr< Tok.IDENT $mlexpr_of_string s$ >>
| Tok.FIELD s -> <:expr< Tok.FIELD $mlexpr_of_string s$ >>
| Tok.INT s -> <:expr< Tok.INT $mlexpr_of_string s$ >>
+| Tok.INDEX s -> <:expr< Tok.INDEX $mlexpr_of_string s$ >>
| Tok.STRING s -> <:expr< Tok.STRING $mlexpr_of_string s$ >>
| Tok.LEFTQMARK -> <:expr< Tok.LEFTQMARK >>
| Tok.BULLET s -> <:expr< Tok.BULLET $mlexpr_of_string s$ >>