git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Fix #1591, use the 'negate' in scope
f090fbdPhil Freeman
src/Language/PureScript/Sugar/Operators.hs+1−1
compare with golang
unifiedsplit
@@ -66,7 +66,7 @@ removeSignedLiterals (Module ss coms mn ds exts) = Module ss coms mn (map f' ds)
66 where
66 where
67 (f', _, _) = everywhereOnValues id go id
67 (f', _, _) = everywhereOnValues id go id
68
68
69− go (UnaryMinus val) = App (Var (Qualified (Just (ModuleName [ProperName C.prelude])) (Ident C.negate))) val
69+ go (UnaryMinus val) = App (Var (Qualified Nothing (Ident C.negate))) val
70 go other = other
70 go other = other
71
71
72rebracketModule :: (Applicative m, MonadError MultipleErrors m) => [[(Qualified Ident, Expr -> Expr -> Expr, Associativity)]] -> Module -> m Module
72rebracketModule :: (Applicative m, MonadError MultipleErrors m) => [[(Qualified Ident, Expr -> Expr -> Expr, Associativity)]] -> Module -> m Module