@@ -592,6 +592,10 @@ cgOp (LZExt ITNative ITBig) [x] =
592 setUsedITBig
592 setUsedITBig
593 pure $ JsForeign "new jsbn.BigInteger(String(%0))" [x]
593 pure $ JsForeign "new jsbn.BigInteger(String(%0))" [x]
594cgOp (LIntFloat ITNative) [x] = pure $ x
594cgOp (LIntFloat ITNative) [x] = pure $ x
595+cgOp (LIntFloat ITBig) [x] =
598+ pure $ JsForeign "%0.intValue()" [x]
595cgOp LFACos [x] = pure $ JsApp "Math.acos" [x]
599cgOp LFACos [x] = pure $ JsApp "Math.acos" [x]
596cgOp LFATan [x] = pure $ JsApp "Math.atan" [x]
600cgOp LFATan [x] = pure $ JsApp "Math.atan" [x]
597cgOp LFCos [x] = pure $ JsApp "Math.cos" [x]
601cgOp LFCos [x] = pure $ JsApp "Math.cos" [x]