;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Apr 2000
;;;;
-;;;; $Id: package.lisp,v 1.28 2003/05/07 21:05:44 kevin Exp $
+;;;; $Id: package.lisp,v 1.36 2003/06/12 02:38:39 kevin Exp $
;;;;
;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;;
;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
;;;; *************************************************************************
-(declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
-
-(in-package :cl-user)
+(in-package #:cl-user)
(defpackage #:kmrcl
- (:nicknames :kl)
- (:use :common-lisp)
+ (:nicknames #:kl)
+ (:use #:cl)
(:export
#:ensure-integer
#:mklist
#:until
#:while
#:for
+
+ ;; strings.lisp
#:mapappend
#:mapcar-append-string
#:mapcar2-append-string
+ #:position-char
+ #:position-not-char
#:delimited-string-to-list
#:list-to-delimited-string
+ #:prefixed-fixnum-string
+ #:integer-string
+ #:fast-string-search
+ #:string-to-list-skip-delimiter
+ #:string-starts-with
+
#:flatten
- #:append-sublists
+
#:indent-spaces
+ #:print-n-chars
#:print-list
#:print-rows
#:file-subst
#:stream-subst
+
+ ;; lists.lisp
#:remove-tree-if
#:find-tree
#:with-each-file-line
#:with-each-stream-line
#:remove-keyword
#:remove-keywords
- #:nsubseq
+ #:append-sublists
+ #:nsubseq
;; math.lisp
#:ensure-integer
;; From attrib-class.lisp
#:attributes-class
#:slot-attribute
+ #:slot-attributes
+
#:generalized-equal
-
+
;; From buffered input
#:make-fields-buffer
#:xml-tag-contents
#:positions-xml-tag-contents
#:xml-cdata
+ #:write-xml-cdata
;; From console
*console-msgs*