X-Git-Url: http://git.kpe.io/?p=kmrcl.git;a=blobdiff_plain;f=package.lisp;h=64db28fb66e2c7f168395a6649ec7edb44f37d19;hp=a4011d7cee25cc8851f3e3ed48a47f9beaa65bfe;hb=e9927af19ebf762b2311f296643c00e3aa9cbb00;hpb=a287b1a6782d53c22fc1807e44aae62fb7094bc5

diff --git a/package.lisp b/package.lisp
index a4011d7..64db28f 100644
--- a/package.lisp
+++ b/package.lisp
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: package.lisp,v 1.36 2003/06/12 02:38:39 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,43 +37,115 @@
    #:for
 
    ;; strings.lisp
+   #:string-trim-whitespace
+   #:string-left-trim-whitespace
+   #:string-right-trim-whitespace
    #:mapappend
    #: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-substitute
    #:string-to-list-skip-delimiter
    #:string-starts-with
+   #:count-string-char
+   #:count-string-char-if
+   #:hexchar
+   #: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
+   #:string-elide
+   #:shrink-vector
+   #:collapse-whitespace
+   #:string->list
+   #:trim-non-alphanumeric
    
-   #:flatten
-   
+   ;; io.lisp
    #:indent-spaces
+   #:indent-html-spaces
    #:print-n-chars
+   #:print-n-strings
    #:print-list
    #:print-rows
+   #:write-fixnum
    #:file-subst
    #:stream-subst
+   #:null-output-stream
+   #:directory-tree
+   #:write-utime-hms
+   #:write-utime-hm
+   #:write-utime-ymdhms
+   #:write-utime-ymdhm
+   #:write-utime-hms-stream
+   #:write-utime-hm-stream
+   #:write-utime-ymdhms-stream
+   #:write-utime-ymdhm-stream
+   #:with-utime-decoding
+   #:with-utime-decoding-utc-offset
+   #:is-dst
+   #:year
+   #:month
+   #:day-of-month
+   #:hour
+   #:minute
+   #:second
+   #:daylight-p
+   #:zone
+   #:day-of-month
+   #:day-of-week
+   #:+datetime-number-strings+   
+   #:utc-offset
+   
+   ;; 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
    #:remove-keyword
    #:remove-keywords
    #:append-sublists
+   #:alist-elem-p
+   #:alistp
+   #:get-alist
+   #:update-alist
+   #:alist-plist
+   #:plist-alist
+   #:update-plist
+   #:get-plist
+   #:flatten
 
+   ;; seq.lisp
    #:nsubseq
+   
    ;; math.lisp
    #:ensure-integer
+   #:histogram
+   #:fixnum-width
+   #:scaled-epsilon
    
    ;; macros.lisp
    #:time-iterations
+   #:time-seconds
    #:in
    #:mean
    #:with-gensyms
@@ -86,10 +159,19 @@
    #:alambda
    #:it
    #:mac
+   #:mv-bind
+   #:deflex
+   #:def-cached-vector
+   #:def-cached-instance
+   #:with-ignore-errors
+   #:ppmx
+   #:defconst
    
    ;; files.lisp
    #:print-file-contents
+   #:read-stream-to-string
    #:read-file-to-string
+   #:read-stream-to-strings
    #:read-file-to-strings
    
    ;; strings.lisp
@@ -99,10 +181,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
@@ -113,9 +195,17 @@
    #:escape-backslashes
    #:concat-separated-strings
    #:print-separated-strings
+   #:lex-string
+   #:split-alphanumeric-string
+   
+   ;; strmatch.lisp
+   #:score-multiword-match
+   #:multiword-match
    
    ;; symbols.lisp
    #:ensure-keyword
+   #:ensure-keyword-upcase
+   #:ensure-keyword-default-case
    #:concat-symbol
    #:concat-symbol-pkg
    #:show
@@ -139,13 +229,15 @@
    #:date-string
    #:print-float-units
    #:print-seconds
+   #:posix-time-to-utime
    
    ;; From random.lisp
    #:seed-random-generator
    #:random-choice
    
-   ;; From telnet-server.lisp
-   #:start-telnet-server	  
+   ;; From repl.lisp
+   #:make-repl
+   #:init/repl
    
    ;; From web-utils
    #:*base-url*
@@ -155,21 +247,57 @@
    #:*standard-xhtml-header*
    #:*standard-xml-header*
    #:user-agent-ie-p
+   #:decode-uri-query-string
+   #:split-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*
-   cmsg
-   cmsg-c
-   cmsg-add
-   cmsg-remove
-   fixme
+   #:*console-msgs*
+   #:cmsg
+   #:cmsg-c
+   #:cmsg-add
+   #:cmsg-remove
+   #:fixme
+
+   ;; byte-stream
+   #:make-binary-array-output-stream
+   #:get-output-stream-data
+   #:dump-output-stream-data
+   #:make-byte-array-input-stream
+
+   ;; sockets.lisp
+   #:make-active-socket
+   #:close-active-socket
+   
+   ;; listener.lisp
+   #: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
    ))