Commit ae53d47b authored by Simon Marlow's avatar Simon Marlow
Browse files

fix compilation for x86_64

parent b2e42d0f
......@@ -3323,8 +3323,8 @@ genCCall target dest_regs args = do
F64 -> unitOL (MOV rep (OpReg xmm0) (OpReg r_dest))
rep -> unitOL (MOV rep (OpReg rax) (OpReg r_dest))
where
rep = cmmRegRep dest
r_dest = getRegisterReg dest
rep = localRegRep dest
r_dest = getRegisterReg (CmmLocal dest)
assign_code many = panic "genCCall.assign_code many"
return (load_args_code `appOL`
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment