X-Git-Url: http://git.kpe.io/?p=kmrcl.git;a=blobdiff_plain;f=package.lisp;h=071c920f043df62bddc1eb6d540064b10316dfba;hp=2e3ea2400ea953cf51d5dab1be6ea3633a9fdce4;hb=22d1e67006cc5f8ba1f668ec7f991df02e8bc570;hpb=066d1f100407cebbf9b28ee9135d8538876e8c3f diff --git a/package.lisp b/package.lisp index 2e3ea24..071c920 100644 --- a/package.lisp +++ b/package.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Apr 2000 ;;;; -;;;; $Id: package.lisp,v 1.31 2003/05/14 21:31:42 kevin Exp $ +;;;; $Id: package.lisp,v 1.41 2003/06/17 17:50:45 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,14 +40,31 @@ #:mapcar-append-string #:mapcar2-append-string #:position-char + #:position-not-char #:delimited-string-to-list + #:string-delimited-string-to-list #:list-to-delimited-string #:prefixed-fixnum-string + #:integer-string + #:fast-string-search + #:string-to-list-skip-delimiter + #:string-starts-with + #:count-string-char + #:count-string-char-if + #:hexchar + #:escape-uri-field + #:non-alphanumericp + #:random-string + #:first-char + #:last-char #:flatten - + + ;; io.lisp #:indent-spaces + #:indent-html-spaces #:print-n-chars + #:print-n-strings #:print-list #:print-rows #:file-subst @@ -122,8 +137,10 @@ ;; From attrib-class.lisp #:attributes-class #:slot-attribute + #:slot-attributes + #:generalized-equal - + ;; From buffered input #:make-fields-buffer @@ -150,12 +167,14 @@ #:*standard-xhtml-header* #:*standard-xml-header* #:user-agent-ie-p + #:decode-uri-query-string ;; From xml-utils #:wrap-with-xml #:xml-tag-contents #:positions-xml-tag-contents #:xml-cdata + #:write-xml-cdata ;; From console *console-msgs*