r4981: Auto commit for Debian build
[kmrcl.git] / package.lisp
1 ;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10 -*-
2 ;;;; *************************************************************************
3 ;;;; FILE IDENTIFICATION
4 ;;;;
5 ;;;; Name:          package.lisp
6 ;;;; Purpose:       Package definition for kmrcl package
7 ;;;; Programmer:    Kevin M. Rosenberg
8 ;;;; Date Started:  Apr 2000
9 ;;;;
10 ;;;; $Id: package.lisp,v 1.32 2003/05/16 08:32:10 kevin Exp $
11 ;;;;
12 ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg
13 ;;;;
14 ;;;; KMRCL users are granted the rights to distribute and use this software
15 ;;;; as governed by the terms of the Lisp Lesser GNU Public License
16 ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
17 ;;;; *************************************************************************
18
19 (declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
20
21 (in-package :cl-user)
22
23 (defpackage #:kmrcl
24   (:nicknames :kl)
25   (:use :common-lisp)
26   (:export
27    #:ensure-integer
28    #:mklist
29    #:filter
30    #:appendnew
31    #:memo-proc
32    #:memoize
33    #:defun-memo
34    #:_f
35    #:compose
36    #:until
37    #:while
38    #:for
39
40    ;; strings.lisp
41    #:mapappend
42    #:mapcar-append-string
43    #:mapcar2-append-string
44    #:position-char
45    #:delimited-string-to-list
46    #:list-to-delimited-string
47    #:prefixed-fixnum-string
48    #:integer-string
49    
50    #:flatten
51    
52    #:indent-spaces
53    #:print-n-chars
54    #:print-list
55    #:print-rows
56    #:file-subst
57    #:stream-subst
58
59    ;; lists.lisp
60    #:remove-tree-if
61    #:find-tree
62    #:with-each-file-line
63    #:with-each-stream-line
64    #:remove-keyword
65    #:remove-keywords
66    #:append-sublists
67
68    #:nsubseq
69    ;; math.lisp
70    #:ensure-integer
71    
72    ;; macros.lisp
73    #:time-iterations
74    #:in
75    #:mean
76    #:with-gensyms
77    #:let-if
78    #:let-when
79    #:aif
80    #:awhen
81    #:awhile
82    #:aand
83    #:acond
84    #:alambda
85    #:it
86    #:mac
87    
88    ;; files.lisp
89    #:print-file-contents
90    #:read-file-to-string
91    #:read-file-to-strings
92    
93    ;; strings.lisp
94    #:string-append
95    #:count-string-words
96    #:substitute-string-for-char
97    #:string-trim-last-character
98    #:nstring-trim-last-character
99    #:string-hash
100    #:string-not-null?
101    #:whitespace?
102    #:not-whitespace?
103    #:string-ws?
104    #:string-invert
105    #:escape-xml-string
106    #:make-usb8-array
107    #:usb8-array-to-string
108    #:string-to-usb8-array
109    #:substitute-chars-strings
110    #:add-sql-quotes
111    #:escape-backslashes
112    #:concat-separated-strings
113    #:print-separated-strings
114    
115    ;; symbols.lisp
116    #:ensure-keyword
117    #:concat-symbol
118    #:concat-symbol-pkg
119    #:show
120    #:show-variables
121    #:show-functions
122    
123    ;; From attrib-class.lisp
124    #:attributes-class
125    #:slot-attribute
126    #:generalized-equal
127    
128    ;; From buffered input
129    
130    #:make-fields-buffer
131    #:read-buffered-fields
132    
133    ;; From datetime.lisp
134    #:pretty-date
135    #:date-string
136    #:print-float-units
137    #:print-seconds
138    
139    ;; From random.lisp
140    #:seed-random-generator
141    #:random-choice
142    
143    ;; From telnet-server.lisp
144    #:start-telnet-server          
145    
146    ;; From web-utils
147    #:*base-url*
148    #:base-url!
149    #:make-url
150    #:*standard-html-header*
151    #:*standard-xhtml-header*
152    #:*standard-xml-header*
153    #:user-agent-ie-p
154    
155    ;; From xml-utils
156    #:wrap-with-xml
157    #:xml-tag-contents
158    #:positions-xml-tag-contents
159    #:xml-cdata
160    
161    ;; From console
162    *console-msgs*
163    cmsg
164    cmsg-c
165    cmsg-add
166    cmsg-remove
167    fixme
168    ))
169
170
171