summaryrefslogtreecommitdiff
path: root/asmcomp/un_anf.ml
diff options
context:
space:
mode:
Diffstat (limited to 'asmcomp/un_anf.ml')
-rw-r--r--asmcomp/un_anf.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/asmcomp/un_anf.ml b/asmcomp/un_anf.ml
index 5d06aa963a..50f9e7b1e2 100644
--- a/asmcomp/un_anf.ml
+++ b/asmcomp/un_anf.ml
@@ -599,7 +599,7 @@ let primitive_moveable (prim : Clambda_primitives.primitive)
is never mutated *)
Moveable
| _ ->
- match Semantics_of_primitives.for_clambda_primitive prim with
+ match Semantics_of_primitives.for_primitive prim with
| No_effects, No_coeffects -> Moveable
| No_effects, Has_coeffects
| Only_generative_effects, No_coeffects