X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fhppa%2Fpred.lisp;h=8c40e9a137d81f8bcec785e5f44dd865c013b262;hb=d5520a24b6c356918c2f91bf91dae60f62e1d065;hp=d6261fb02ca9bf1eeb966640c1adb014cefba792;hpb=f6b2e375747a54a1bfa34ead9f9af2d4e8b5aa38;p=sbcl.git diff --git a/src/compiler/hppa/pred.lisp b/src/compiler/hppa/pred.lisp index d6261fb..8c40e9a 100644 --- a/src/compiler/hppa/pred.lisp +++ b/src/compiler/hppa/pred.lisp @@ -23,8 +23,7 @@ (:generator 0 (error "BRANCH-IF not yet implemented"))) -(defun - convert-conditional-move-p (node dst-tn x-tn y-tn) +(defun convert-conditional-move-p (node dst-tn x-tn y-tn) (declare (ignore node dst-tn x-tn y-tn)) nil)