Update of /project/movitz/cvsroot/ia-x86 In directory clnet:/tmp/cvs-serv19271
Modified Files: ia-x86.lisp Log Message: Minor tweaks to printing instruction objects etc. Mostly related to testing the new assembler.
--- /project/movitz/cvsroot/ia-x86/ia-x86.lisp 2004/09/02 09:01:29 1.4 +++ /project/movitz/cvsroot/ia-x86/ia-x86.lisp 2007/12/20 22:42:37 1.5 @@ -9,7 +9,7 @@ ;;;; Created at: Fri Dec 17 18:01:26 1999 ;;;; Distribution: See the accompanying file COPYING. ;;;; -;;;; $Id: ia-x86.lisp,v 1.4 2004/09/02 09:01:29 ffjeld Exp $ +;;;; $Id: ia-x86.lisp,v 1.5 2007/12/20 22:42:37 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------
@@ -44,7 +44,7 @@ (defmethod print-object ((obj instruction) stream) (cond (*print-readably* - (format stream "(~@[~A ~]~A~{ ~A~})" + (format stream "(~@[~W ~]~W~{ ~W~})" (instruction-prefixes obj) (type-of obj) (instruction-operands obj))