X-Git-Url: http://git.kpe.io/?p=kmrcl.git;a=blobdiff_plain;f=package.lisp;h=b04ab8e50f18c16a28ab0990d24ce7aa4e136801;hp=754aef5324ddebe540782f99db70a35dde24ee3f;hb=19bee416d52c52d58261faf3d459c45572563149;hpb=6e84de6e7bff9079d0b6ba62a3c85d2eb98f2eb4 diff --git a/package.lisp b/package.lisp index 754aef5..b04ab8e 100644 --- a/package.lisp +++ b/package.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Apr 2000 ;;;; -;;;; $Id: package.lisp,v 1.49 2003/07/11 06:58:32 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 @@ -47,21 +51,26 @@ #: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 - #: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 - - #:flatten + #:string-strip-ending + #:string-maybe-shorten + #:string-elide + #:shrink-vector + #:collapse-whitespace + #:string->list ;; io.lisp #:indent-spaces @@ -73,9 +82,18 @@ #:write-fixnum #: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 @@ -90,12 +108,16 @@ #:plist-alist #:update-plist #:get-plist + #:flatten ;; seq.lisp #:nsubseq ;; math.lisp #:ensure-integer + #:histogram + #:fixnum-width + #:scaled-epsilon ;; macros.lisp #:time-iterations @@ -113,10 +135,16 @@ #:it #:mac #:mv-bind + #:deflex + #:def-cached-vector + #:def-cached-instance + #:with-ignore-errors ;; files.lisp #:print-file-contents + #:read-stream-to-string #:read-file-to-string + #:read-stream-to-strings #:read-file-to-strings ;; strings.lisp @@ -126,10 +154,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 @@ -140,9 +168,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 @@ -166,6 +202,7 @@ #:date-string #:print-float-units #:print-seconds + #:posix-time-to-utime ;; From random.lisp #:seed-random-generator @@ -184,13 +221,14 @@ #:*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* @@ -214,6 +252,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 ))