[Maxima-commits] CVS: maxima/src mactex.lisp,1.9,1.10

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

Update of /cvsroot/maxima/maxima/src
In directory usw-pr-cvs1:/tmp/cvs-serv6846/src

Modified Files:
	mactex.lisp 
Log Message:
Define strcat for all Lisps.


Index: mactex.lisp
===================================================================
RCS file: /cvsroot/maxima/maxima/src/mactex.lisp,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -d -r1.9 -r1.10
--- mactex.lisp	14 Jun 2002 18:12:11 -0000	1.9
+++ mactex.lisp	19 Jun 2002 17:39:13 -0000	1.10
@@ -249,7 +249,6 @@
 ;      ((eql l 1) pname)
 ;      (t (concatenate 'string "\\mathrm{" pname "}")))))
 
-#+(or cmu gcl) ;; any others?
 (defun strcat (&rest args)
   (apply #'concatenate 'string (mapcar #'string args)))