codegen: add instanceof stub

[mate.git] / Mate / X86CodeGen.hs

diff --git a/Mate/X86CodeGen.hs b/Mate/X86CodeGen.hs
index c45f9083858c98ce9484af1ecb7b646faa03b55e..9ba2ddd31f6734140f9c0b3a0ef4cac9e6dfaa48 100644 (file)
--- a/Mate/X86CodeGen.hs
+++ b/Mate/X86CodeGen.hs
@@ -237,6 +237,10 @@ emitFromBB method sig cls hmap =  do
         mtable <- liftIO $ getMethodTable objname
         mov (Disp 0, eax) mtable
     emit (CHECKCAST _) = nop -- TODO(bernhard): ...
+    -- TODO(bernhard): ...
+    emit (INSTANCEOF _) = do
+      pop eax
+      push (1 :: Word32)
     emit ATHROW = nop -- TODO(bernhard): ...
     emit I2C = do
       pop eax