diff options
author | Thomas Miedema <thomasmiedema@gmail.com> | 2015-09-12 20:37:20 +0200 |
---|---|---|
committer | Thomas Miedema <thomasmiedema@gmail.com> | 2015-09-12 20:37:20 +0200 |
commit | 3ec205aec45ec13fc7274d6b019cd7f7654191f4 (patch) | |
tree | 4786c32148bd3669e6196ec0290ec456469f9f83 | |
parent | 37081acc74b9820b284161c95b16ff878fc5830f (diff) | |
download | haskell-3ec205aec45ec13fc7274d6b019cd7f7654191f4.tar.gz |
CodeGen: fix typo in error message
-rw-r--r-- | compiler/nativeGen/X86/CodeGen.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/nativeGen/X86/CodeGen.hs b/compiler/nativeGen/X86/CodeGen.hs index 1fe289c84a..26df11cd73 100644 --- a/compiler/nativeGen/X86/CodeGen.hs +++ b/compiler/nativeGen/X86/CodeGen.hs @@ -2082,7 +2082,7 @@ genCCall _ is32Bit target dest_regs args = do MOV format (OpReg rdx) (OpReg reg_h), MOV format (OpReg rax) (OpReg reg_l)] return code - _ -> panic "genCCall: Wrong number of arguments/results for add2" + _ -> panic "genCCall: Wrong number of arguments/results for mul2" _ -> if is32Bit then genCCall32' dflags target dest_regs args |