C++: fix param order of 'prim' functions
commit82c82ca46175a3f9c6d969c16e94490bfee4cc0b
authorAndy Arvanitis <andyarvanitis@gmail.com>
dateSun 11 Sep 2016, 14:52 (10 years ago)
parent8e4b634
src/Language/PureScript/CodeGen/Cpp.hs+1−1
@@ -875,7 +875,7 @@ primFn :: T.Type -> ([CppType], Maybe CppType)
875875primFn = go []
876876 where
877877 go ps (T.TypeApp (T.TypeApp fn a) b) | fn == E.tyFunction,
878− Just a' <- numType a = go (a' : ps) b
878+ Just a' <- numType a = go (ps ++ [a']) b
879879 go ps t | Just t' <- numType t = (ps , Just t')
880880 go _ _ = ([], Nothing)
881881 numType t@(T.TypeConstructor {}) | t == E.tyInt = Just intType