From fbd28e2c6b5f1302cd2d36d79149e3b0a9f01d84 Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Sun, 22 Apr 2018 12:48:11 +0100 Subject: Allow CmmLabelDiffOff with different widths Summary: This change makes it possible to generate a static 32-bit relative label offset on x86_64. Currently we can only generate word-sized label offsets. This will be used in D4634 to shrink info tables. See D4632 for more details. Test Plan: See D4632 Reviewers: bgamari, niteria, michalt, erikd, jrtc27, osa1 Subscribers: thomie, carter Differential Revision: https://phabricator.haskell.org/D4633 --- compiler/nativeGen/X86/Ppr.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'compiler/nativeGen/X86/Ppr.hs') diff --git a/compiler/nativeGen/X86/Ppr.hs b/compiler/nativeGen/X86/Ppr.hs index a295a47058..c03bf4f14c 100644 --- a/compiler/nativeGen/X86/Ppr.hs +++ b/compiler/nativeGen/X86/Ppr.hs @@ -529,7 +529,7 @@ pprDataItem' dflags lit -- case lit of -- A relative relocation: - CmmLabelDiffOff _ _ _ -> + CmmLabelDiffOff _ _ _ _ -> [text "\t.long\t" <> pprImm imm, text "\t.long\t0"] _ -> -- cgit v1.2.1