aboutsummaryrefslogtreecommitdiff
path: root/kernel/vmbytecodes.ml
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/vmbytecodes.ml')
-rw-r--r--kernel/vmbytecodes.ml3
1 files changed, 0 insertions, 3 deletions
diff --git a/kernel/vmbytecodes.ml b/kernel/vmbytecodes.ml
index a1dea977cd..2cef6e3359 100644
--- a/kernel/vmbytecodes.ml
+++ b/kernel/vmbytecodes.ml
@@ -62,7 +62,6 @@ type instruction =
| Kbranch of Label.t (* jump to label *)
| Kprim of CPrimitives.t * pconstant
| Kcamlprim of CPrimitives.t * Label.t
- | Kareint of int
and bytecodes = instruction list
@@ -152,8 +151,6 @@ let rec pp_instr i =
str "camlcall " ++ str (CPrimitives.to_string op) ++ spc () ++
pp_lbl lbl
- | Kareint n -> str "areint " ++ int n
-
and pp_bytecodes c =
match c with
| [] -> str ""