diff --git a/src/X86.ml b/src/X86.ml index 27f6833d4..3f194c49c 100644 --- a/src/X86.ml +++ b/src/X86.ml @@ -344,7 +344,7 @@ let compile env code = | String -> ".string_tag_patt" | Sexp -> ".sexp_tag_patt" ) 1 false - + | ENTER xs -> let env, code = List.fold_left