From 06c7fd3fd47dade1c07f200ea8b7e34fc703e6e5 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Sat, 25 Aug 2007 17:12:31 +0000 Subject: [PATCH] Add a missing "entryCode" This was causing us to try to jump to the address of an infotable when unregisterised, leading to a segfault. --- compiler/codeGen/CgTailCall.lhs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/compiler/codeGen/CgTailCall.lhs b/compiler/codeGen/CgTailCall.lhs index e25e794..cd51fba 100644 --- a/compiler/codeGen/CgTailCall.lhs +++ b/compiler/codeGen/CgTailCall.lhs @@ -191,7 +191,7 @@ performTailCall fun_info arg_amodes pending_assts -- No, enter the closure. ; enterClosure ; labelC is_constr - ; stmtC (CmmJump (CmmLit (CmmLabel lbl)) []) + ; stmtC (CmmJump (entryCode $ CmmLit (CmmLabel lbl)) []) } {- -- This is a scrutinee for a case expression -- 1.7.10.4