X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fsparc%2Fsystem.lisp;h=18c377e062433ced3325861ef33858f213a1db8b;hb=f69ea3d7480621d986c40caa07bb9a6140e90cf5;hp=0ef87f43ec9ce6c96ac06203f3faa68df8c469f6;hpb=09d7974601df2aaaa820ca576026b9b4f03e6ab1;p=sbcl.git

diff --git a/src/compiler/sparc/system.lisp b/src/compiler/sparc/system.lisp
index 0ef87f4..18c377e 100644
--- a/src/compiler/sparc/system.lisp
+++ b/src/compiler/sparc/system.lisp
@@ -222,6 +222,8 @@
   (:generator 1
     (inst unimp pending-interrupt-trap)))
 
+#!+sb-thread
+(error "write a VOP for CURRENT-THREAD-OFFSET-SAP")
 
 (define-vop (halt)
   (:generator 1