@@ -855,6 +855,8 @@ cgOp (LSHL ity) [x,y] = ibin ity x y (Shl False False)
855cgOp (LLSHR ity) [x,y] = ibin ity x y (LShr False)
855cgOp (LLSHR ity) [x,y] = ibin ity x y (LShr False)
856cgOp (LASHR ity) [x,y] = ibin ity x y (AShr False)
856cgOp (LASHR ity) [x,y] = ibin ity x y (AShr False)
858+cgOp LNoOp xs = return $ last xs
858cgOp LStrEq [x,y] = do
860cgOp LStrEq [x,y] = do
859 x' <- unbox FString x
861 x' <- unbox FString x
860 y' <- unbox FString y
862 y' <- unbox FString y