Get rid of vm-support-routines indirection.

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

diff --git a/src/compiler/ppc/pred.lisp b/src/compiler/ppc/pred.lisp
index 22aa9a9..9237916 100644 (file)
--- a/src/compiler/ppc/pred.lisp
+++ b/src/compiler/ppc/pred.lisp
@@ -27,7 +27,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)