diff options
Diffstat (limited to 'parsing/astterm.ml')
-rw-r--r-- | parsing/astterm.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/astterm.ml b/parsing/astterm.ml index 13f33f977..e78ae3cd3 100644 --- a/parsing/astterm.ml +++ b/parsing/astterm.ml @@ -273,7 +273,7 @@ let rawconstr_of_qualid env vars loc qid = (* Is it a reference to a syntactic definition? *) try let sp = Syntax_def.locate_syntactic_definition qid in - Syntax_def.search_syntactic_definition sp, [] + set_loc_of_rawconstr loc (Syntax_def.search_syntactic_definition sp), [] with Not_found -> error_global_not_found_loc loc qid |