60a96e7c1c0ded47b5aa9ea60037861a7b74e396
[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.47 2003/07/08 16:11:19 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 (in-package #:cl-user)
20
21 (defpackage #:kmrcl
22   (:nicknames #:kl)
23   (:use #:cl)
24   (:export
25    #:ensure-integer
26    #:mklist
27    #:filter
28    #:appendnew
29    #:memo-proc
30    #:memoize
31    #:defun-memo
32    #:_f
33    #:compose
34    #:until
35    #:while
36    #:for
37
38    ;; strings.lisp
39    #:mapappend
40    #:mapcar-append-string
41    #:mapcar2-append-string
42    #:position-char
43    #:position-not-char
44    #:delimited-string-to-list
45    #:string-delimited-string-to-list
46    #:list-to-delimited-string
47    #:prefixed-fixnum-string
48    #:integer-string
49    #:fast-string-search
50    #:string-to-list-skip-delimiter
51    #:string-starts-with
52    #:count-string-char
53    #:count-string-char-if
54    #:hexchar
55    #:escape-uri-field
56    #:unescape-uri-field
57    #:non-alphanumericp
58    #:random-string
59    #:first-char
60    #:last-char
61    #:ensure-string
62    #:string-left-trim-one-char
63    
64    #:flatten
65
66    ;; io.lisp
67    #:indent-spaces
68    #:indent-html-spaces
69    #:print-n-chars
70    #:print-n-strings
71    #:print-list
72    #:print-rows
73    #:write-fixnum
74    #:file-subst
75    #:stream-subst
76
77    ;; lists.lisp
78    #:remove-tree-if
79    #:find-tree
80    #:with-each-file-line
81    #:with-each-stream-line
82    #:remove-keyword
83    #:remove-keywords
84    #:append-sublists
85    #:alist-elem-p
86    #:alistp
87    #:get-alist
88    #:update-alist
89    #:alist-plist
90    #:plist-alist
91    #:update-plist
92    #:get-plist
93
94    ;; seq.lisp
95    #:nsubseq
96    
97    ;; math.lisp
98    #:ensure-integer
99    
100    ;; macros.lisp
101    #:time-iterations
102    #:in
103    #:mean
104    #:with-gensyms
105    #:let-if
106    #:let-when
107    #:aif
108    #:awhen
109    #:awhile
110    #:aand
111    #:acond
112    #:alambda
113    #:it
114    #:mac
115    
116    ;; files.lisp
117    #:print-file-contents
118    #:read-file-to-string
119    #:read-file-to-strings
120    
121    ;; strings.lisp
122    #:string-append
123    #:count-string-words
124    #:substitute-string-for-char
125    #:string-trim-last-character
126    #:nstring-trim-last-character
127    #:string-hash
128    #:string-not-null?
129    #:whitespace?
130    #:not-whitespace?
131    #:string-ws?
132    #:string-invert
133    #:escape-xml-string
134    #:make-usb8-array
135    #:usb8-array-to-string
136    #:string-to-usb8-array
137    #:substitute-chars-strings
138    #:add-sql-quotes
139    #:escape-backslashes
140    #:concat-separated-strings
141    #:print-separated-strings
142    
143    ;; symbols.lisp
144    #:ensure-keyword
145    #:concat-symbol
146    #:concat-symbol-pkg
147    #:show
148    #:show-variables
149    #:show-functions
150    
151    ;; From attrib-class.lisp
152    #:attributes-class
153    #:slot-attribute
154    #:slot-attributes
155
156    #:generalized-equal
157
158    ;; From buffered input
159    
160    #:make-fields-buffer
161    #:read-buffered-fields
162    
163    ;; From datetime.lisp
164    #:pretty-date
165    #:date-string
166    #:print-float-units
167    #:print-seconds
168    
169    ;; From random.lisp
170    #:seed-random-generator
171    #:random-choice
172    
173    ;; From telnet-server.lisp
174    #:start-telnet-server          
175    
176    ;; From web-utils
177    #:*base-url*
178    #:base-url!
179    #:make-url
180    #:*standard-html-header*
181    #:*standard-xhtml-header*
182    #:*standard-xml-header*
183    #:user-agent-ie-p
184    #:decode-uri-query-string
185    
186    ;; From xml-utils
187    #:wrap-with-xml
188    #:xml-tag-contents
189    #:positions-xml-tag-contents
190    #:xml-cdata
191    #:write-xml-cdata
192    
193    ;; From console
194    #:*console-msgs*
195    #:cmsg
196    #:cmsg-c
197    #:cmsg-add
198    #:cmsg-remove
199    #:fixme
200
201    ;; byte-stream
202    #:make-binary-array-output-stream
203    #:get-output-stream-data
204    #:dump-output-stream-data
205    #:make-byte-array-input-stream
206
207    ;; sockets.lisp
208    #:make-active-socket
209    #:close-active-socket
210    
211    ;; listener.lisp
212    #:init/listener
213    #:stop-all/listener
214    #:listener
215    ))
216
217
218