From b5bce547d2bda032ac528f65aaa4a402189b0d6f Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Tue, 17 Mar 2020 20:31:37 -0600
Subject: [PATCH] fix x86 (32-bit) `__collect-safe` callable

original commit: 530e6ac49b6ac31c2993517cb15633de73e6c85a
---
 s/x86.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/s/x86.ss b/s/x86.ss
index 02979489d0..a59ca5bd5e 100644
--- a/s/x86.ss
+++ b/s/x86.ss
@@ -2846,7 +2846,7 @@
                        (set! ,%eax ,(%mref ,%sp ,(+ 8 (push-registers-size result-regs result-num-fp-regs 1))))
                        ,(%inline push ,%eax)
                        ,(%inline unactivate-thread)
-                       ,(%inline pop ,%eax))])
+                       (set! ,%eax ,(%inline pop)))])
               (if (and (null? result-regs) (fx= 0 result-num-fp-regs))
                   e
                   (%seq