[oct-cvs] Oct commit: oct oct.system

[rtoy]

Update of /project/oct/cvsroot/oct
In directory cl-net:/tmp/cvs-serv11007

Modified Files:
	oct.system 
Log Message:
Add in-package.


--- /project/oct/cvsroot/oct/oct.system	2007/11/28 21:41:27	1.24
+++ /project/oct/cvsroot/oct/oct.system	2010/06/15 18:26:39	1.25
@@ -1,4 +1,4 @@
-;;;; -*- Mode: lisp -*-
+;;;; -*- Mode: lisp; Package: CL-USER -*-
 ;;;;
 ;;;; Copyright (c) 2007 Raymond Toy
 ;;;;
@@ -23,6 +23,7 @@
 ;;;; FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
 ;;;; OTHER DEALINGS IN THE SOFTWARE.
 
+(in-package #:cl-user)
 ;; If you want all core functions to be inline (like the C++ code
 ;; does), add :qd-inline to *features* by enabling the following line.
 ;; This makes compilation much, much slower, but the resulting code