X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=package.lisp;h=f518b81c9472923d2be7e04f7d26eece580df79c;hb=b387e2d288d8cfa49030d6d9f28635e1f16f3f9e;hp=8646698a4649c699e749759726699f72a7be2e54;hpb=aab275e8e82b4a4a4af4749d79ca49d2dd596c1c;p=kmrcl.git

diff --git a/package.lisp b/package.lisp
index 8646698..f518b81 100644
--- a/package.lisp
+++ b/package.lisp
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: package.lisp,v 1.13 2002/11/25 07:45:36 kevin Exp $
+;;;; $Id: package.lisp,v 1.20 2003/02/07 14:21:55 kevin Exp $
 ;;;;
 ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -23,8 +23,8 @@
 (defpackage #:kmrcl
   (:nicknames :kl)
   (:use :common-lisp)
-  (:export #:bind-if
-	   #:bind-when
+  (:export #:let-if
+	   #:let-when
 	   #:aif
 	  #:awhen
 	  #:awhile
@@ -39,6 +39,7 @@
 	  #:ensure-integer
 	  #:mklist
 	  #:filter
+	  #:appendnew
 	  #:memo-proc
 	  #:memoize
 	  #:defun-memo
@@ -52,21 +53,9 @@
 	  #:mapcar2-append-string
 	  #:delimited-string-to-list
 	  #:list-to-delimited-string
-	  #:string-append
-	  #:count-string-words
-	  #:substitute-string-for-char
-	  #:string-trim-last-character
-	  #:string-hash
-	  #:string-not-null?
-	  #:whitespace?
-	  #:not-whitespace?
-	  #:string-ws?
-	  #:string-invert
 	  #:indent-spaces
 	  #:print-list
 	  #:print-rows
-	  #:concat-symbol
-	  #:concat-symbol-pkg
 	  #:file-subst
 	  #:stream-subst
 	  #:remove-tree-if
@@ -83,7 +72,33 @@
 	  #:in
 	  #:mean
 	  #:with-gensyms
+	  #:time-iterations
+	  #:print-float-units
+	  #:print-seconds
+	  #:nsubseq
+	  
+	  ;; strings.lisp
+	  #:string-append
+	  #:count-string-words
+	  #:substitute-string-for-char
+	  #:string-trim-last-character
+	  #:string-hash
+	  #:string-not-null?
+	  #:whitespace?
+	  #:not-whitespace?
+	  #:string-ws?
+	  #:string-invert
+	  #:escape-xml-string
+	  #:string-replace-char-string
+	  #:make-usb8-array
+	  #:usb8-array-to-string
+	  #:string-to-usb8-array
 	  
+	  ;; symbols.lisp
+	  #:ensure-keyword
+	  #:concat-symbol
+	  #:concat-symbol-pkg
+
 	  ;; From attrib-class.lisp
 	  #:attributes-class
 	  #:slot-attribute
@@ -112,8 +127,21 @@
 	  #:*standard-html-header*
 	  #:*standard-xhtml-header*
 	  #:*standard-xml-header*
-	  #:xml-cdata
 	  #:user-agent-ie-p
+
+	  ;; From xml-utils
+	  #:wrap-with-xml
+	  #:xml-tag-contents
+	  #:positions-xml-tag-contents
+	  #:xml-cdata
+	  
+	  ;; From console
+	  *console-msgs*
+	  cmsg
+	  cmsg-c
+	  cmsg-add
+	  cmsg-remove
+	  fixme
 	  ))