Fixed a typo

This commit is contained in:
Samuel Hammersberg 2023-05-08 22:07:35 +02:00
parent 94dd3bf1ea
commit 56c80faeff

View file

@ -395,7 +395,7 @@ emitApp rt e1 e2 = do
pure $ Call FastCC (type2LlvmType rt) visibility name args pure $ Call FastCC (type2LlvmType rt) visibility name args
call <- preludeFuns (fst (head typ)) call name (snd (head args)) (snd (args !! 1)) call <- preludeFuns call name (snd (head args)) (snd (args !! 1))
emit $ Comment $ show (type2LlvmType rt) emit $ Comment $ show (type2LlvmType rt)
emit $ SetVariable vs call emit $ SetVariable vs call