projects
/
hyperobject.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r3472: *** empty log message ***
[hyperobject.git]
/
package.lisp
diff --git
a/package.lisp
b/package.lisp
index 6c76fb9f13b34111b0fb87d79acd944b0f0f8dc9..0a2be5018e56c541f3fbf882cee03d50b6dc87fb 100644
(file)
--- a/
package.lisp
+++ b/
package.lisp
@@
-7,7
+7,7
@@
;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Apr 2000
;;;;
;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Apr 2000
;;;;
-;;;; $Id: package.lisp,v 1.
5 2002/11/22 10:49:24
kevin Exp $
+;;;; $Id: package.lisp,v 1.
11 2002/11/25 04:49:22
kevin Exp $
;;;;
;;;; This file is Copyright (c) 2000-2002 by Kevin M. Rosenberg
;;;; *************************************************************************
;;;;
;;;; This file is Copyright (c) 2000-2002 by Kevin M. Rosenberg
;;;; *************************************************************************
@@
-16,20
+16,20
@@
(in-package :cl-user)
(in-package :cl-user)
-(defpackage #:hyperobject
-mop
- (:nicknames #:ho
-mop
)
+(defpackage #:hyperobject
+ (:nicknames #:ho)
(:use #:common-lisp #:kmrcl)
(:export
(:use #:common-lisp #:kmrcl)
(:export
+ #:package
#:hyperobject
#:hyperobject-class
#:hyperobject
#:hyperobject-class
- #:hyperobject-base-url!
#:hyperobject-class-title
#:load-all-subobjects
#:print-hyperobject
))
#:hyperobject-class-title
#:load-all-subobjects
#:print-hyperobject
))
-(defpackage #:hyperobject
- (:nicknames #:ho)
+(defpackage #:hyperobject
-no-mop
+ (:nicknames #:ho
-no-mop
)
(:use #:common-lisp #:kmrcl)
(:export
#:define-hyperobject
(:use #:common-lisp #:kmrcl)
(:export
#:define-hyperobject
@@
-39,10
+39,13
@@
#:print-hyperobject
))
#:print-hyperobject
))
-(defpackage #:hyperobject-mop-user
- (:use #:hyperobject-mop #:cl #:cl-user))
-
-
(defpackage #:hyperobject-user
(defpackage #:hyperobject-user
+ (:nicknames #:ho-user)
(:use #:hyperobject #:cl #:cl-user))
(:use #:hyperobject #:cl #:cl-user))
+(defpackage #:hyperobject-no-mop-user
+ (:nicknames #:ho-no-mop-user)
+ (:use #:hyperobject-no-mop #:cl #:cl-user))
+
+
+