X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=package.lisp;h=79306a82fe977c1f0f10200361d8c2eb976d2272;hb=5dbd1fda3cf8f68c070cf3036dc6b1b536bc9f5a;hp=a309d54d3393af4125566649fa87cf1f77559189;hpb=9a080059e2396d4145fdfacf9a3c61cb745b9484;p=kmrcl.git diff --git a/package.lisp b/package.lisp index a309d54..79306a8 100644 --- a/package.lisp +++ b/package.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Apr 2000 ;;;; -;;;; $Id: package.lisp,v 1.29 2003/05/08 23:35:18 kevin Exp $ +;;;; $Id: package.lisp,v 1.35 2003/06/07 05:45:14 kevin Exp $ ;;;; ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -16,13 +16,11 @@ ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL. ;;;; ************************************************************************* -(declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0))) - -(in-package :cl-user) +(in-package #:cl-user) (defpackage #:kmrcl - (:nicknames :kl) - (:use :common-lisp) + (:nicknames #:kl) + (:use #:cl) (:export #:ensure-integer #:mklist @@ -42,11 +40,18 @@ #:mapcar-append-string #:mapcar2-append-string #:position-char + #:position-not-char #:delimited-string-to-list #:list-to-delimited-string + #:prefixed-fixnum-string + #:integer-string + #:fast-string-search + #:string-to-list-skip-delimiter + #:flatten #:indent-spaces + #:print-n-chars #:print-list #:print-rows #:file-subst @@ -153,6 +158,7 @@ #:xml-tag-contents #:positions-xml-tag-contents #:xml-cdata + #:write-xml-cdata ;; From console *console-msgs*