From: Robert D. <rob...@us...> - 2008-06-22 07:58:14
|
Update of /cvsroot/maxima/maxima/share/contrib/stringproc In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv11898/share/contrib/stringproc Modified Files: stringproc.lisp Log Message: Cut out obsolete function $SCONC (superseded by $CONCAT and $SCONCAT now that Maxima strings are Lisp strings). Index: stringproc.lisp =================================================================== RCS file: /cvsroot/maxima/maxima/share/contrib/stringproc/stringproc.lisp,v retrieving revision 1.34 retrieving revision 1.35 diff -u -d -r1.34 -r1.35 --- stringproc.lisp 27 Apr 2008 15:09:32 -0000 1.34 +++ stringproc.lisp 21 Jun 2008 20:51:24 -0000 1.35 @@ -334,11 +334,6 @@ (string-right-trim ds res))) -;; obsolete in maxima-strings-are-lisp-strings-branch, will be cut out soon -(defun $sconc (&rest args) - (format t "$SCONC: PUNT TO $CONCAT. REPLACE CALLS TO THIS FUNCTION WITH CALLS TO CONCAT.~%") - (apply #'$concat args)) - (defun $slength (s) (if (not (stringp s)) |