summaryrefslogtreecommitdiffstats
path: root/byterun/interp.c
diff options
context:
space:
mode:
authorXavier Leroy <xavier.leroy@inria.fr>1999-12-06 16:59:24 +0000
committerXavier Leroy <xavier.leroy@inria.fr>1999-12-06 16:59:24 +0000
commit45a18236df62dba31d5365c60bf6548883291689 (patch)
treea42d3573133a22d2d65917b49bf7ee3f888d7bc6 /byterun/interp.c
parent870788858bcec587e88d1ce78fa81e34486420dd (diff)
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
Diffstat (limited to 'byterun/interp.c')
-rw-r--r--byterun/interp.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/byterun/interp.c b/byterun/interp.c
index d5c21f310..a61252e7a 100644
--- a/byterun/interp.c
+++ b/byterun/interp.c
@@ -941,6 +941,9 @@ value interprete(code_t prog, asize_t prog_size)
accu = Val_unit;
pc++;
Next;
+ Instruct(ISINT):
+ accu = Val_long(accu & 1);
+ Next;
/* Object-oriented operations */