Get rid of vm-support-routines indirection.

[sbcl.git] / src / compiler / sparc / pred.lisp

diff --git a/src/compiler/sparc/pred.lisp b/src/compiler/sparc/pred.lisp
index 3d00528..9677a69 100644 (file)
--- a/src/compiler/sparc/pred.lisp
+++ b/src/compiler/sparc/pred.lisp
@@ -34,7 +34,7 @@
   (:generator 0
      (error "BRANCH-IF not yet implemented")))
 
-(!def-vm-support-routine
+(defun
     convert-conditional-move-p (node dst-tn x-tn y-tn)
   (declare (ignore node dst-tn x-tn y-tn))
   nil)