aboutsummaryrefslogtreecommitdiff
path: root/interp/stdarg.ml
diff options
context:
space:
mode:
authorEmilio Jesus Gallego Arias2018-02-14 06:57:40 +0100
committerEmilio Jesus Gallego Arias2018-03-09 23:23:40 +0100
commit4af41a12a0e7e6b17d25a71568641bd03d5e1f94 (patch)
tree9ffa30a21f0d5b80aaeae66955e652f185929498 /interp/stdarg.ml
parent5f989f48eaaf5e13568fce9849f40bc554ca0166 (diff)
[located] More work towards using CAst.t
We continue with the work of #402 and #6745 and update most of the remaining parts of the AST: - module declarations - intro patterns - top-level sentences Now, parsed documents should be full annotated by `CAst` nodes.
Diffstat (limited to 'interp/stdarg.ml')
-rw-r--r--interp/stdarg.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/interp/stdarg.ml b/interp/stdarg.ml
index 5f1aad0c25..0958cc7eee 100644
--- a/interp/stdarg.ml
+++ b/interp/stdarg.ml
@@ -34,7 +34,7 @@ let wit_pre_ident : string uniform_genarg_type =
let loc_of_or_by_notation f = function
| AN c -> f c
- | ByNotation (loc,(s,_)) -> loc
+ | ByNotation {CAst.loc;v=(s,_)} -> loc
let wit_int_or_var =
make0 ~dyn:(val_tag (topwit wit_int)) "int_or_var"