[Maxima-commits] CVS: maxima/share/tensor canten.lisp,1.12,1.13 gener.lisp,1.11,1.12 itensor.lisp,1.50,1.51 symtry.lisp,1.18,1.19 tentex.lisp,1.5,1.6

[Raymond T. <rt...@us...>]

Update of /cvsroot/maxima/maxima/share/tensor
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10778/share/tensor

Modified Files:
	canten.lisp gener.lisp itensor.lisp symtry.lisp tentex.lisp 
Log Message:
This large set of changes comes from Douglas Crosher adding support
for SCL:

o Change package names to use keywords and uninterned symbols instead
  of strings, so SCL (and probably Allegro) can use lower-case mode.
o Downcase a few uppercase symbols that were inadvertently left out in
  the great downcasing.
o Add support for building Maxima with SCL

SCL support is untested.


Index: canten.lisp
===================================================================
RCS file: /cvsroot/maxima/maxima/share/tensor/canten.lisp,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -d -r1.12 -r1.13
--- canten.lisp	6 May 2005 20:28:48 -0000	1.12
+++ canten.lisp	7 Nov 2005 17:37:11 -0000	1.13
@@ -15,7 +15,7 @@
 
 ;	** (c) Copyright 1979 Massachusetts Institute of Technology **
 
-(in-package "MAXIMA")
+(in-package :maxima)
 
 
 

Index: gener.lisp
===================================================================
RCS file: /cvsroot/maxima/maxima/share/tensor/gener.lisp,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -d -r1.11 -r1.12
--- gener.lisp	9 Dec 2004 00:27:28 -0000	1.11
+++ gener.lisp	7 Nov 2005 17:37:11 -0000	1.12
@@ -14,7 +14,7 @@
 ;;
 
 ;	** (c) Copyright 1979 Massachusetts Institute of Technology **
-(in-package "MAXIMA")
+(in-package :maxima)
 
 
 (declare-top (special $imetric $metricconvert indlist empty))

Index: itensor.lisp
===================================================================
RCS file: /cvsroot/maxima/maxima/share/tensor/itensor.lisp,v
retrieving revision 1.50
retrieving revision 1.51
diff -u -d -r1.50 -r1.51
--- itensor.lisp	21 May 2005 01:23:36 -0000	1.50
+++ itensor.lisp	7 Nov 2005 17:37:11 -0000	1.51
@@ -20,7 +20,7 @@
 ;; correspond with the naming conventions in commercial MACSYMA.
 ;;
 
-(in-package "MAXIMA")
+(in-package :maxima)
 
 (macsyma-module itensor) ;; added 9/24/82 at UCB
 

Index: symtry.lisp
===================================================================
RCS file: /cvsroot/maxima/maxima/share/tensor/symtry.lisp,v
retrieving revision 1.18
retrieving revision 1.19
diff -u -d -r1.18 -r1.19
--- symtry.lisp	21 May 2005 23:23:12 -0000	1.18
+++ symtry.lisp	7 Nov 2005 17:37:11 -0000	1.19
@@ -14,7 +14,7 @@
 ;;
 ;;; symtry 100 Feb 12, 1982
 
-(in-package "MAXIMA")
+(in-package :maxima)
 
 ;	** (c) Copyright 1979 Massachusetts Institute of Technology **
 

Index: tentex.lisp
===================================================================
RCS file: /cvsroot/maxima/maxima/share/tensor/tentex.lisp,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- tentex.lisp	4 Sep 2005 00:56:27 -0000	1.5
+++ tentex.lisp	7 Nov 2005 17:37:11 -0000	1.6
@@ -13,7 +13,7 @@
 ;; Comments: TeX formatting module for itensor.lisp
 ;;
 
-(in-package "MAXIMA")
+(in-package :maxima)
 
 ;(declare-top
 ;	 (special lop rop ccol $gcprint texport $labels $inchar