X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=package.lisp;h=bba5fb8582082fe25be7731476e08761d23c9e05;hb=966fd9d857be6472f986c41d6c765df36eaaf2ac;hp=d11e68fb91e8ddba4c257bbf5bd477324e242d8b;hpb=2ffbc18c75d4b31c58fad32950658c90e256b556;p=kmrcl.git

diff --git a/package.lisp b/package.lisp
index d11e68f..bba5fb8 100644
--- a/package.lisp
+++ b/package.lisp
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: package.lisp,v 1.50 2003/07/14 04:10:02 kevin Exp $
+;;;; $Id$
 ;;;;
 ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -25,6 +25,7 @@
    #:ensure-integer
    #:mklist
    #:filter
+   #:map-and-remove-nils
    #:appendnew
    #:memo-proc
    #:memoize
@@ -36,6 +37,9 @@
    #:for
 
    ;; strings.lisp
+   #:string-trim-whitespace
+   #:string-left-trim-whitespace
+   #:string-right-trim-whitespace
    #:mapappend
    #:mapcar-append-string
    #:mapcar2-append-string
@@ -52,17 +56,19 @@
    #:count-string-char
    #:count-string-char-if
    #:hexchar
-   #:escape-uri-field
-   #:unescape-uri-field
+   #:encode-uri-string
+   #:decode-uri-string
    #:non-alphanumericp
    #:random-string
    #:first-char
    #:last-char
    #:ensure-string
    #:string-right-trim-one-char
+   #:string-strip-ending
+   #:string-maybe-shorten
+   #:shrink-vector
+   #:collapse-whitespace
    
-   #:flatten
-
    ;; io.lisp
    #:indent-spaces
    #:indent-html-spaces
@@ -74,9 +80,17 @@
    #:file-subst
    #:stream-subst
    #:null-output-stream
-   
+   #:directory-tree
+
+   ;; impl.lisp
+   #:probe-directory
+   #:cwd
+   #:quit
+   #:command-line-arguments
+   #:shell-command-output
+
    ;; lists.lisp
-   #:remove-tree-if
+   #:remove-from-tree-if
    #:find-tree
    #:with-each-file-line
    #:with-each-stream-line
@@ -91,12 +105,15 @@
    #:plist-alist
    #:update-plist
    #:get-plist
+   #:flatten
 
    ;; seq.lisp
    #:nsubseq
    
    ;; math.lisp
    #:ensure-integer
+   #:histogram
+   #:fixnum-width
    
    ;; macros.lisp
    #:time-iterations
@@ -114,6 +131,9 @@
    #:it
    #:mac
    #:mv-bind
+   #:deflex
+   #:def-cached-vector
+   #:def-cached-instance
    
    ;; files.lisp
    #:print-file-contents
@@ -127,10 +147,10 @@
    #:string-trim-last-character
    #:nstring-trim-last-character
    #:string-hash
-   #:string-not-null?
-   #:whitespace?
-   #:not-whitespace?
-   #:string-ws?
+   #:is-string-empty
+   #:is-char-whitespace
+   #:not-whitespace-char
+   #:is-string-whitespace
    #:string-invert
    #:escape-xml-string
    #:make-usb8-array
@@ -141,6 +161,12 @@
    #:escape-backslashes
    #:concat-separated-strings
    #:print-separated-strings
+   #:lex-string
+   #:split-alphanumeric-string
+   
+   ;; strmatch.lisp
+   #:score-multiword-match
+   #:multiword-match
    
    ;; symbols.lisp
    #:ensure-keyword
@@ -187,11 +213,11 @@
    #:decode-uri-query-string
    
    ;; From xml-utils
-   #:wrap-with-xml
+   #:sgml-header-stream
    #:xml-tag-contents
    #:positions-xml-tag-contents
-   #:xml-cdata
-   #:write-xml-cdata
+   #:cdata-string
+   #:write-cdata
    
    ;; From console
    #:*console-msgs*
@@ -215,6 +241,25 @@
    #:init/listener
    #:stop-all/listener
    #:listener
+   
+   ;; fformat.lisp
+   #:fformat
+
+   ;; os.lisp
+   #:command-output
+   #:run-shell-command-output-stream
+   
+   ;; color.lisp
+   #:rgb->hsv
+   #:rgb255->hsv255
+   #:hsv->rgb
+   #:hsv255->rgb255
+   #:hsv-equal
+   #:hsv255-equal
+   #:hsv-similar
+   #:hsv255-similar
+   #:hue-difference
+   #:hue-difference-fixnum
    ))