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."))