r4938: 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.31 2003/05/14 21:31:42 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    
49    #:flatten
50    
51    #:indent-spaces
52    #:print-n-chars
53    #:print-list
54    #:print-rows
55    #:file-subst
56    #:stream-subst
57
58    ;; lists.lisp
59    #:remove-tree-if
60    #:find-tree
61    #:with-each-file-line
62    #:with-each-stream-line
63    #:remove-keyword
64    #:remove-keywords
65    #:append-sublists
66
67    #:nsubseq
68    ;; math.lisp
69    #:ensure-integer
70    
71    ;; macros.lisp
72    #:time-iterations
73    #:in
74    #:mean
75    #:with-gensyms
76    #:let-if
77    #:let-when
78    #:aif
79    #:awhen
80    #:awhile
81    #:aand
82    #:acond
83    #:alambda
84    #:it
85    #:mac
86    
87    ;; files.lisp
88    #:print-file-contents
89    #:read-file-to-string
90    #:read-file-to-strings
91    
92    ;; strings.lisp
93    #:string-append
94    #:count-string-words
95    #:substitute-string-for-char
96    #:string-trim-last-character
97    #:nstring-trim-last-character
98    #:string-hash
99    #:string-not-null?
100    #:whitespace?
101    #:not-whitespace?
102    #:string-ws?
103    #:string-invert
104    #:escape-xml-string
105    #:make-usb8-array
106    #:usb8-array-to-string
107    #:string-to-usb8-array
108    #:substitute-chars-strings
109    #:add-sql-quotes
110    #:escape-backslashes
111    #:concat-separated-strings
112    #:print-separated-strings
113    
114    ;; symbols.lisp
115    #:ensure-keyword
116    #:concat-symbol
117    #:concat-symbol-pkg
118    #:show
119    #:show-variables
120    #:show-functions
121    
122    ;; From attrib-class.lisp
123    #:attributes-class
124    #:slot-attribute
125    #:generalized-equal
126    
127    ;; From buffered input
128    
129    #:make-fields-buffer
130    #:read-buffered-fields
131    
132    ;; From datetime.lisp
133    #:pretty-date
134    #:date-string
135    #:print-float-units
136    #:print-seconds
137    
138    ;; From random.lisp
139    #:seed-random-generator
140    #:random-choice
141    
142    ;; From telnet-server.lisp
143    #:start-telnet-server          
144    
145    ;; From web-utils
146    #:*base-url*
147    #:base-url!
148    #:make-url
149    #:*standard-html-header*
150    #:*standard-xhtml-header*
151    #:*standard-xml-header*
152    #:user-agent-ie-p
153    
154    ;; From xml-utils
155    #:wrap-with-xml
156    #:xml-tag-contents
157    #:positions-xml-tag-contents
158    #:xml-cdata
159    
160    ;; From console
161    *console-msgs*
162    cmsg
163    cmsg-c
164    cmsg-add
165    cmsg-remove
166    fixme
167    ))
168
169
170