@@ -251,8 +251,8 @@ w8Bin _ _ = Nothing
251251w16Bin op [VConstant (W16 x), VConstant (W16 y)] = Just $ VConstant (W16 (op x y))
252252w16Bin _ _ = Nothing
253253
254−w32Bin op [VConstant (W32 x), VConstant (W32 y)] = Just $ VConstant (W32 (op x y))
255−w32Bin _ _ = Nothing
254+-- w32Bin op [VConstant (W32 x), VConstant (W32 y)] = Just $ VConstant (W32 (op x y))
255+-- w32Bin _ _ = Nothing
256256
257257intToWord8 [VConstant (I x)] = Just $ VConstant (W8 $ fromIntegral x)
258258intToWord8 _ = Nothing