Add missing case in needsBigInt in JS back end
commitdf13cbc87e692aca9336edc623b86c62d46c39e9
authorEdwin Brady <ecb10@st-andrews.ac.uk>
dateThu 1 Jan 2015, 12:54 (12 years ago)
parent6449ede
src/IRTS/CodegenJavaScript.hs+4
@@ -57,6 +57,10 @@ initCompileInfo bc =
5757 || (or $ map (needsBigInt . snd) c)
5858 || (or $ map (testConstForBigInt . fst) c)
5959
60+ testBCForBigInt (CASE _ _ c d) =
61+ maybe False needsBigInt d
62+ || (or $ map (needsBigInt . snd) c)
63+
6064 testBCForBigInt _ = False
6165
6266 testConstForBigInt :: Const -> Bool