From e91fc9cfe3537a2f333a41ab5487b09b0795f23c Mon Sep 17 00:00:00 2001
From: toy <toy>
Date: Wed, 3 Oct 2001 14:08:18 +0000
Subject: [PATCH] Use trap_PseudoAtomic instead of the hardwired 16.

---
 lisp/sparc-assem.S | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/lisp/sparc-assem.S b/lisp/sparc-assem.S
index d38a168f4..6fed8b072 100644
--- a/lisp/sparc-assem.S
+++ b/lisp/sparc-assem.S
@@ -86,7 +86,7 @@ _call_into_lisp:
         /* No longer atomic, and check for interrupt. */
 	sub	reg_ALLOC, 4, reg_ALLOC
 	andcc	reg_ALLOC, 3, reg_ZERO
-	tne	16
+	tne	trap_PseudoAtomic
 
         /* Pass in the args. */
         sll     %i2, 2, reg_NARGS
@@ -135,7 +135,7 @@ lra:
         /* Were we interrupted? */
 	sub	reg_ALLOC, 4, reg_ALLOC
 	andcc	reg_ALLOC, 3, reg_ZERO
-	tne	16
+	tne	trap_PseudoAtomic
 
         /* Back to C we go. */
 	ld	[%sp+FRAMESIZE-4], %i7
@@ -178,7 +178,7 @@ _call_into_c:
         /* Were we interrupted? */
 	sub	reg_ALLOC, 4, reg_ALLOC
 	andcc	reg_ALLOC, 3, reg_ZERO
-	tne	16
+	tne	trap_PseudoAtomic
 
         /* Into C we go. */
         call    reg_CFUNC
@@ -216,7 +216,7 @@ _call_into_c:
         /* No longer atomic. */
 	sub	reg_ALLOC, 4, reg_ALLOC
 	andcc	reg_ALLOC, 3, reg_ZERO
-	tne	16
+	tne	trap_PseudoAtomic
 
         /* Reset the lisp stack. */
         /* Note: OCFP is in one of the locals, it gets preserved across C. */
-- 
GitLab