[Git][ghc/ghc][wip/marge_bot_batch_merge_job] rts: don't enforce aligned((8)) on 32-bit targets

[Marge Bot (@marge-bot)]

Marge Bot pushed to branch wip/marge_bot_batch_merge_job at Glasgow Haskell Compiler / GHC


Commits:
92e77807 by Cheng Shao at 2022-10-05T18:39:55-04:00
rts: don't enforce aligned((8)) on 32-bit targets

We simply need to align to the word size for pointer tagging to work. On
32-bit targets, aligned((8)) is wasteful.

- - - - -


1 changed file:

- rts/include/Stg.h


Changes:

=====================================
rts/include/Stg.h
=====================================
@@ -263,8 +263,8 @@ typedef StgFunPtr       F_;
 #define EB_(X)    extern const char X[]
 #define IB_(X)    static const char X[]
 /* static (non-heap) closures (requires alignment for pointer tagging): */
-#define EC_(X)    extern       StgWordArray (X) GNU_ATTRIBUTE(aligned (8))
-#define IC_(X)    static       StgWordArray (X) GNU_ATTRIBUTE(aligned (8))
+#define EC_(X)    extern       StgWordArray (X) GNU_ATTRIBUTE(aligned (SIZEOF_VOID_P))
+#define IC_(X)    static       StgWordArray (X) GNU_ATTRIBUTE(aligned (SIZEOF_VOID_P))
 /* writable data (does not require alignment): */
 #define ERW_(X)   extern       StgWordArray (X)
 #define IRW_(X)   static       StgWordArray (X)



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/92e77807cce348eadcecedeec839de54c5d97266

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/92e77807cce348eadcecedeec839de54c5d97266
You're receiving this email because of your account on gitlab.haskell.org.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20221005/3244f80e/attachment-0001.html>