From 45a18236df62dba31d5365c60bf6548883291689 Mon Sep 17 00:00:00 2001
From: Xavier Leroy <xavier.leroy@inria.fr>
Date: Mon, 6 Dec 1999 16:59:24 +0000
Subject: Revu compilation du filtrage des variants.  Ajout de la primitive
 Pisint et de l'instruction bytecode ISINT.

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@2669 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
---
 bytecomp/lambda.ml | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'bytecomp/lambda.ml')

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
 
-- 
cgit v1.2.3-70-g09d2