git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Fix inlining for Int operations
8283addGary Burgess
src/Language/PureScript/CodeGen/JS/Optimizer/Inliner.hs+5−5
@@ -269,25 +269,25 @@ semiringNumber :: (String, String)
269semiringNumber = (C.prelude, C.semiringNumber)
269semiringNumber = (C.prelude, C.semiringNumber)
270
270
271semiringInt :: (String, String)
271semiringInt :: (String, String)
272−semiringInt = (C.dataInt, C.semiringInt)
272+semiringInt = (C.prelude, C.semiringInt)
273
273
274ringNumber :: (String, String)
274ringNumber :: (String, String)
275ringNumber = (C.prelude, C.ringNumber)
275ringNumber = (C.prelude, C.ringNumber)
276
276
277ringInt :: (String, String)
277ringInt :: (String, String)
278−ringInt = (C.dataInt, C.ringInt)
278+ringInt = (C.prelude, C.ringInt)
279
279
280moduloSemiringNumber :: (String, String)
280moduloSemiringNumber :: (String, String)
281moduloSemiringNumber = (C.prelude, C.moduloSemiringNumber)
281moduloSemiringNumber = (C.prelude, C.moduloSemiringNumber)
282
282
283moduloSemiringInt :: (String, String)
283moduloSemiringInt :: (String, String)
284−moduloSemiringInt = (C.dataInt, C.moduloSemiringInt)
284+moduloSemiringInt = (C.prelude, C.moduloSemiringInt)
285
285
286eqNumber :: (String, String)
286eqNumber :: (String, String)
287eqNumber = (C.prelude, C.eqNumber)
287eqNumber = (C.prelude, C.eqNumber)
288
288
289eqInt :: (String, String)
289eqInt :: (String, String)
290−eqInt = (C.dataInt, C.eqInt)
290+eqInt = (C.prelude, C.eqInt)
291
291
292eqString :: (String, String)
292eqString :: (String, String)
293eqString = (C.prelude, C.eqNumber)
293eqString = (C.prelude, C.eqNumber)
@@ -299,7 +299,7 @@ ordNumber :: (String, String)
299ordNumber = (C.prelude, C.ordNumber)
299ordNumber = (C.prelude, C.ordNumber)
300
300
301ordInt :: (String, String)
301ordInt :: (String, String)
302−ordInt = (C.dataInt, C.ordInt)
302+ordInt = (C.prelude, C.ordInt)
303
303
304semigroupString :: (String, String)
304semigroupString :: (String, String)
305semigroupString = (C.prelude, C.semigroupString)
305semigroupString = (C.prelude, C.semigroupString)
src/Language/PureScript/Constants.hs−3
@@ -271,8 +271,5 @@ st = "Control_Monad_ST"
271dataFunction :: String
271dataFunction :: String
272dataFunction = "Data_Function"
272dataFunction = "Data_Function"
273
273
274−dataInt :: String
275−dataInt = "Data_Int"
276−
277dataIntBits :: String
274dataIntBits :: String
278dataIntBits = "Data_Int_Bits"
275dataIntBits = "Data_Int_Bits"