[Git][ghc/ghc][wip/T25485] rts/adjustor: Fix stack overrun error in Nativei386 adjustor

[Ben Gamari (@bgamari)]

Ben Gamari pushed to branch wip/T25485 at Glasgow Haskell Compiler / GHC


Commits:
490ca885 by Ben Gamari at 2024-11-15T16:10:21-05:00
rts/adjustor: Fix stack overrun error in Nativei386 adjustor

We were reserving the wrong kind of adjustor context (the generic
`AdjustorContext` used by other adjustor implementations, rather than
the i386-specific `CCallContext`) to return the adjustor context while
freeing, resulting in #25485.

Fixes #25485.

- - - - -


1 changed file:

- rts/adjustor/Nativei386.c


Changes:

=====================================
rts/adjustor/Nativei386.c
=====================================
@@ -90,7 +90,7 @@ createAdjustor(StgStablePtr hptr, StgFunPtr wptr,
 void
 freeHaskellFunctionPtr(void* ptr)
 {
-    struct AdjustorContext context;
+    struct CCallContext context;
     free_adjustor(ptr, &context);
     freeStablePtr(context.hptr);
 }



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/490ca8856e85cafff405782f9352639f17c9e97d

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/490ca8856e85cafff405782f9352639f17c9e97d
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/20241115/9af8fc92/attachment.html>