[cells-cvs] CVS update: cell-cultures/asdf-aclproj/asdf-aclproj.lisp

[Thomas F. Burdick]

Update of /project/cells/cvsroot/cell-cultures/asdf-aclproj
In directory common-lisp.net:/tmp/cvs-serv29624/asdf-aclproj

Modified Files:
	asdf-aclproj.lisp 
Log Message:
Cleaned up the packages a bit.

Date: Mon Jul  5 12:26:00 2004
Author: tburdick

Index: cell-cultures/asdf-aclproj/asdf-aclproj.lisp
diff -u cell-cultures/asdf-aclproj/asdf-aclproj.lisp:1.3 cell-cultures/asdf-aclproj/asdf-aclproj.lisp:1.4
--- cell-cultures/asdf-aclproj/asdf-aclproj.lisp:1.3	Wed Jun 30 20:48:54 2004
+++ cell-cultures/asdf-aclproj/asdf-aclproj.lisp	Mon Jul  5 12:26:00 2004
@@ -22,19 +22,27 @@
 ;;; A hack to load Allegro's .lpr project files with ASDF.
 ;;; 
 
-(defpackage :asdf-aclproj
+(defpackage :asdf-aclproj-impl
   (:use :cl)
-  (:export #:lpr-project-file))
+  (:export #:lpr-project-file
+	   #:define-project
+	   #:project
+	   #:module
+	   #:project-module))
 
-(in-package :asdf-aclproj)
+(defpackage :asdf-aclproj
+  (:use :asdf-aclproj-impl)
+  (:export #:lpr-project-file))
 
 (defpackage :asdf-aclproj-user
   (:use :cl)
   (:import-from :asdf-aclproj
-		asdf-aclproj::define-project
-		asdf-aclproj::project
-		asdf-aclproj::module
-		asdf-aclproj::project-module))
+		#:define-project
+		#:project
+		#:module
+		#:project-module))
+
+(in-package :asdf-aclproj-impl)
 
 ;;;
 ;;; Classes for ASDF