summaryrefslogtreecommitdiffstats
path: root/bytecomp/lambda.ml
diff options
context:
space:
mode:
Diffstat (limited to 'bytecomp/lambda.ml')
-rw-r--r--bytecomp/lambda.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/bytecomp/lambda.ml b/bytecomp/lambda.ml
index e23a6a030..2a1aaccc5 100644
--- a/bytecomp/lambda.ml
+++ b/bytecomp/lambda.ml
@@ -55,6 +55,8 @@ type primitive =
| Parraysetu of array_kind
| Parrayrefs of array_kind
| Parraysets of array_kind
+ (* Test if the argument is a block or an immediate integer *)
+ | Pisint
(* Bitvect operations *)
| Pbittest