Skip to content

Commit ef72761

Browse files
gaschealainfrisch
authored andcommitted
avoid mentioning now-deprecated Pervasives in generated code (#72)
1 parent 331fbc4 commit ef72761

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

ppx_metaquot.ml

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -190,7 +190,7 @@ module Main : sig end = struct
190190
| x -> super # lift_Parsetree_core_type x
191191
end
192192

193-
let loc = ref (app (evar "Pervasives.!") [evar "Ast_helper.default_loc"])
193+
let loc = ref (app (evar "Stdlib.!") [evar "Ast_helper.default_loc"])
194194

195195
let handle_attr = function
196196
| {attr_name={txt="metaloc";loc=l}; attr_payload=e; _} -> loc := get_exp l e

0 commit comments

Comments
 (0)