Update of /project/movitz/cvsroot/ia-x86 In directory common-lisp.net:/tmp/cvs-serv23425

Modified Files: packages.lisp Log Message: Designate the ia-x86 package with #:ia-x86 rather than "IA-X86". Also, a few very minor edits.

Date: Mon Feb 9 19:03:47 2004 Author: ffjeld

Index: ia-x86/packages.lisp diff -u ia-x86/packages.lisp:1.2 ia-x86/packages.lisp:1.3 --- ia-x86/packages.lisp:1.2 Fri Jan 16 06:54:14 2004 +++ ia-x86/packages.lisp Mon Feb 9 19:03:47 2004 @@ -1,6 +1,6 @@ ;;;;------------------------------------------------------------------ ;;;; -;;;; Copyright (C) 20012000, 2002-2003, +;;;; Copyright (C) 20012000, 2002-2004, ;;;; Department of Computer Science, University of Tromso, Norway ;;;; ;;;; Filename: packages.lisp @@ -9,14 +9,14 @@ ;;;; Created at: Wed Feb 16 14:02:57 2000 ;;;; Distribution: See the accompanying file COPYING. ;;;; -;;;; $Id: packages.lisp,v 1.2 2004/01/16 11:54:14 ffjeld Exp $ +;;;; $Id: packages.lisp,v 1.3 2004/02/10 00:03:47 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------

-(in-package "CL-USER") +(in-package #:cl-user)

-(defpackage "IA-X86" - (:use "COMMON-LISP") +(defpackage #:ia-x86 + (:use #:common-lisp) (:export #:init-instruction-tables #:*cpu-mode* @@ -91,9 +91,9 @@ #:symtab-try-lookup-label ))

-(defpackage "IA-X86-INSTR" - (:use "IA-X86") - (:import-from "COMMON-LISP" t nil defclass load eval compile) +(defpackage #:ia-x86-instr + (:use #:ia-x86) + (:import-from #:common-lisp t nil defclass load eval compile) (:documentation - "All the specialized classes for IA-X86 instructions are put into + "All the specialized classes for ia-x86 instructions are put into this package, so that we may have instructions named 'and' etc."))