X-Git-Url: http://git.kpe.io/?p=kmrcl.git;a=blobdiff_plain;f=package.lisp;h=63198e7855fbfb9c41aa528f9f24f8bd1cbcfb34;hp=f42dec56f13d339b57fb78b7b2a7316bbb03a1a5;hb=6f333885c716800cf85c2986a3b835efe0e54e70;hpb=f5dfd7b9cee14237ccd9490b1c4dcd065e1f9acb diff --git a/package.lisp b/package.lisp index f42dec5..63198e7 100644 --- a/package.lisp +++ b/package.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Apr 2000 ;;;; -;;;; $Id: package.lisp,v 1.57 2003/08/09 21:42:43 kevin Exp $ +;;;; $Id$ ;;;; ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -37,6 +37,9 @@ #:for ;; strings.lisp + #:string-trim-whitespace + #:string-left-trim-whitespace + #:string-right-trim-whitespace #:mapappend #:mapcar-append-string #:mapcar2-append-string @@ -78,9 +81,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 @@ -132,10 +143,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