r5066: *** empty log message ***

[kmrcl.git] / package.lisp

diff --git a/package.lisp b/package.lisp
index 2e3ea2400ea953cf51d5dab1be6ea3633a9fdce4..79306a82fe977c1f0f10200361d8c2eb976d2272 100644 (file)
--- 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.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,9 +40,13 @@
    #: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
    
@@ -156,6 +158,7 @@
    #:xml-tag-contents
    #:positions-xml-tag-contents
    #:xml-cdata
+   #:write-xml-cdata
    
    ;; From console
    *console-msgs*