Marge Bot pushed to branch master at Glasgow Haskell Compiler / GHC

Commits:

• ef038aae
  by cydparser at 2026-07-15T04:35:41-04:00

  Reduce bytes allocated for `capabilities` in RTS (fixes #27487)
  
  In rts/Capability.c, `capabilities` is an array of pointers, but it was allocated as if it were an
  array of Capability's.
  

1 changed file:

• rts/Capability.c

Changes:

         max_n_capabilities = RtsFlags.ParFlags.nCapabilities;

     }

-    capabilities = stgMallocBytes(sizeof(Capability) * max_n_capabilities, "initCapabilities");

+    capabilities = stgMallocBytes(sizeof(Capability *) * max_n_capabilities, "initCapabilities");

     n_capabilities = 0;

     moreCapabilities(0, RtsFlags.ParFlags.nCapabilities);

 #else /* !THREADED_RTS */

     n_capabilities = 1;

-    capabilities = stgMallocBytes(sizeof(Capability), "initCapabilities");

+    capabilities = stgMallocBytes(sizeof(Capability *), "initCapabilities");

     capabilities[0] = &MainCapability;

     initCapability(&MainCapability, 0);