diff --git a/code/exports.lisp b/code/exports.lisp
index e8d24dbf13d23cdf2f7bc7603ab902f1af4e4538..8c83cff9a87bb194f4b18f0854e7354327a5e4ef 100644
--- a/code/exports.lisp
+++ b/code/exports.lisp
@@ -5,7 +5,7 @@
 ;;; Carnegie Mellon University, and has been placed in the public domain.
 ;;;
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.226 2003/10/09 19:06:20 toy Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.227 2003/10/09 21:55:45 toy Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -976,7 +976,7 @@
 	   #+sparc
 	   "PSEUDO-ATOMIC-VALUE"
 	   #+sparc
-	   "PSEUDO-ATOMIC-INTERRUPED-VALUE"
+	   "PSEUDO-ATOMIC-INTERRUPTED-VALUE"
 	   "RANDOM-IMMEDIATE-SC-NUMBER" "RATIO-DENOMINATOR-SLOT"
 	   "RATIO-NUMERATOR-SLOT" "RATIO-SIZE" "RATIO-TYPE"
 	   "REGISTER-SAVE-PENALTY" "RETURN-PC-HEADER-TYPE"
diff --git a/compiler/sparc/parms.lisp b/compiler/sparc/parms.lisp
index 36ff107335d84e3ef381d8a8e574487e64eb7d67..becd961fb05d93b05d1904c1f5ce586d1ae68edf 100644
--- a/compiler/sparc/parms.lisp
+++ b/compiler/sparc/parms.lisp
@@ -5,7 +5,7 @@
 ;;; Carnegie Mellon University, and has been placed in the public domain.
 ;;;
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/sparc/parms.lisp,v 1.45 2003/10/09 19:01:22 toy Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/sparc/parms.lisp,v 1.46 2003/10/09 21:55:46 toy Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -330,7 +330,7 @@
 
 
 (export '(pseudo-atomic-trap allocation-trap
-	  pseudo-atomic-value pseudo-atomic-interrupted-mask))
+	  pseudo-atomic-value pseudo-atomic-interrupted-value))
 ;;;; Pseudo-atomic trap number.
 ;;;;
 ;;;; This is the trap number to use when a pseudo-atomic section has