X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fsparc%2Fparms.lisp;h=792612eb78e3b48b68f0e6346f76facca4f53a90;hb=2dbf6e6a5011edecc5361c208e9d5915ca783351;hp=2dc5c355e552706263063a60e3dd291ef31f1e9f;hpb=b0a7abdf2bd6f2d66fcce97196024cdb0e1a1886;p=sbcl.git

diff --git a/src/compiler/sparc/parms.lisp b/src/compiler/sparc/parms.lisp
index 2dc5c35..792612e 100644
--- a/src/compiler/sparc/parms.lisp
+++ b/src/compiler/sparc/parms.lisp
@@ -138,9 +138,14 @@
   cerror
   breakpoint
   fun-end-breakpoint
-  after-breakpoint)
-
-(defenum (:prefix object-not- :suffix -trap :start 16)
+  after-breakpoint
+  ;; Stepper actually not implemented on Sparc, but these constants
+  ;; are still needed to avoid undefined variable warnings during sbcl
+  ;; build.
+  single-step-around
+  single-step-before)
+
+(defenum (:prefix object-not- :suffix -trap :start 24)
   list
   instance)