Commit e080f498 authored by rtoy's avatar rtoy
Browse files

The x-21 instruction is a floating point inst, and has 2 fp args, not 

1 fp and 1 int arg.  (Disassembly was wrong.)
parent 5bead7d1

compiler/ppc/insts.lisp

+3 −3
Original line number Diff line number Diff line
@@ -7,7 +7,7 @@ 
;;; Scott Fahlman or slisp-group@cs.cmu.edu.

;;;

(ext:file-comment

  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/ppc/insts.lisp,v 1.7.2.2 2005/12/19 01:10:02 rtoy Exp $")

  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/ppc/insts.lisp,v 1.7.2.3 2006/01/06 03:25:58 rtoy Exp $")

;;;

;;; **********************************************************************

;;;
@@ -695,8 +695,8 @@ about function addresses and register values.") 
(def-ppc-iformat (x-20 '(:name :tab frt ", " ra ", " rb))

  frt ra rb (xo xo21-30))



(def-ppc-iformat (x-21 '(:name :tab frt ", " rb))

  frt rb (xo xo21-30) rc)

(def-ppc-iformat (x-21 '(:name :tab frt ", " frb))

  frt frb (xo xo21-30) rc)



(def-ppc-iformat (x-22 '(:name :tab frt))

  frt (xo xo21-30) rc)