X-Git-Url: http://git.kpe.io/?p=kmrcl.git;a=blobdiff_plain;f=package.lisp;h=7b7238bdcf488eaf264b0ed27e3ffd6db3351f70;hp=78f264c7d9a2f3e4c76c6b837b982407f64b8489;hb=4de7f25a69c218303f170314ac26217770a531ed;hpb=0785aaa6c33301cdb5d23ab1a09f262d33dba21d

diff --git a/package.lisp b/package.lisp
index 78f264c..7b7238b 100644
--- a/package.lisp
+++ b/package.lisp
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: package.lisp,v 1.19 2003/01/13 21:40:20 kevin Exp $
+;;;; $Id: package.lisp,v 1.21 2003/04/28 23:51:59 kevin Exp $
 ;;;;
 ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -23,125 +23,133 @@
 (defpackage #:kmrcl
   (:nicknames :kl)
   (:use :common-lisp)
-  (:export #:let-if
-	   #:let-when
-	   #:aif
-	  #:awhen
-	  #:awhile
-	  #:aand
-	  #:acond
-	  #:alambda
-	  #:it
-	  #:mac
-	  #:show
-	  #:show-variables
-	  #:show-functions
-	  #:ensure-integer
-	  #:mklist
-	  #:filter
-	  #:appendnew
-	  #:memo-proc
-	  #:memoize
-	  #:defun-memo
-	  #:_f
-	  #:compose
-	  #:until
-	  #:while
-	  #:for
-	  #:mapappend
-	  #:mapcar-append-string
-	  #:mapcar2-append-string
-	  #:delimited-string-to-list
-	  #:list-to-delimited-string
-	  #:indent-spaces
-	  #:print-list
-	  #:print-rows
-	  #:file-subst
-	  #:stream-subst
-	  #:remove-tree-if
-	  #:find-tree
-	  #:with-each-file-line
-	  #:with-each-stream-line
-	  #:print-file-contents
-	  #:read-file-to-string
-	  #:read-file-to-strings
-	  #:add-sql-quotes
-	  #:escape-backslashes
-	  #:remove-keyword
-	  #:remove-keywords
-	  #:in
-	  #:mean
-	  #:with-gensyms
-	  #:time-iterations
-	  #:print-float-units
-	  #:print-seconds
-	  
-	  ;; 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
-
-	  #:generalized-equal
-	  
-	  ;; From buffered input
-	  
-	  #:make-fields-buffer
-	  #:read-buffered-fields
-
-	  #:pretty-date
-	  #:date-string
-
-	  ;; From random.lisp
-	  #:seed-random-generator
-	  #:random-choice
-
-	  ;; From telnet-server.lisp
-	  #:start-telnet-server	  
-
-	  ;; From web-utils
-	  #:*base-url*
-	  #:base-url!
-	  #:make-url
-	  #:*standard-html-header*
-	  #:*standard-xhtml-header*
-	  #:*standard-xml-header*
-	  #: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
-	  ))
+  (:export
+   #:ensure-integer
+   #:mklist
+   #:filter
+   #:appendnew
+   #:memo-proc
+   #:memoize
+   #:defun-memo
+   #:_f
+   #:compose
+   #:until
+   #:while
+   #:for
+   #:mapappend
+   #:mapcar-append-string
+   #:mapcar2-append-string
+   #:delimited-string-to-list
+   #:list-to-delimited-string
+   #:indent-spaces
+   #:print-list
+   #:print-rows
+   #:file-subst
+   #:stream-subst
+   #:remove-tree-if
+   #:find-tree
+   #:with-each-file-line
+   #:with-each-stream-line
+   #:remove-keyword
+   #:remove-keywords
+   #:nsubseq
+   
+   ;; macros.lisp
+   #:time-iterations
+   #:in
+   #:mean
+   #:with-gensyms
+   #:let-if
+   #:let-when
+   #:aif
+   #:awhen
+   #:awhile
+   #:aand
+   #:acond
+   #:alambda
+   #:it
+   #:mac
+   
+   ;; files.lisp
+   #:print-file-contents
+   #:read-file-to-string
+   #:read-file-to-strings
+   
+   ;; 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
+   #:string-replace-chars-strings
+   #:add-sql-quotes
+   #:escape-backslashes
+   
+   ;; symbols.lisp
+   #:ensure-keyword
+   #:concat-symbol
+   #:concat-symbol-pkg
+   #:show
+   #:show-variables
+   #:show-functions
+   
+   ;; From attrib-class.lisp
+   #:attributes-class
+   #:slot-attribute
+   
+   #:generalized-equal
+   
+   ;; From buffered input
+   
+   #:make-fields-buffer
+   #:read-buffered-fields
+   
+   ;; From datetime.lisp
+   #:pretty-date
+   #:date-string
+   #:print-float-units
+   #:print-seconds
+   
+   ;; From random.lisp
+   #:seed-random-generator
+   #:random-choice
+   
+   ;; From telnet-server.lisp
+   #:start-telnet-server	  
+   
+   ;; From web-utils
+   #:*base-url*
+   #:base-url!
+   #:make-url
+   #:*standard-html-header*
+   #:*standard-xhtml-header*
+   #:*standard-xml-header*
+   #: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
+   ))