r8075: add def-cached-instance
[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$
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    #:map-and-remove-nils
29    #:appendnew
30    #:memo-proc
31    #:memoize
32    #:defun-memo
33    #:_f
34    #:compose
35    #:until
36    #:while
37    #:for
38
39    ;; strings.lisp
40    #:string-trim-whitespace
41    #:string-left-trim-whitespace
42    #:string-right-trim-whitespace
43    #:mapappend
44    #:mapcar-append-string
45    #:mapcar2-append-string
46    #:position-char
47    #:position-not-char
48    #:delimited-string-to-list
49    #:string-delimited-string-to-list
50    #:list-to-delimited-string
51    #:prefixed-fixnum-string
52    #:integer-string
53    #:fast-string-search
54    #:string-to-list-skip-delimiter
55    #:string-starts-with
56    #:count-string-char
57    #:count-string-char-if
58    #:hexchar
59    #:uriencode-string
60    #:uridecode-string
61    #:non-alphanumericp
62    #:random-string
63    #:first-char
64    #:last-char
65    #:ensure-string
66    #:string-right-trim-one-char
67    #:string-strip-ending
68    #:string-maybe-shorten
69    #:shrink-vector
70
71    ;; io.lisp
72    #:indent-spaces
73    #:indent-html-spaces
74    #:print-n-chars
75    #:print-n-strings
76    #:print-list
77    #:print-rows
78    #:write-fixnum
79    #:file-subst
80    #:stream-subst
81    #:null-output-stream
82    #:directory-tree
83
84    ;; impl.lisp
85    #:probe-directory
86    #:cwd
87    #:quit
88    #:command-line-arguments
89    #:shell-command-output
90
91    ;; lists.lisp
92    #:remove-from-tree-if
93    #:find-tree
94    #:with-each-file-line
95    #:with-each-stream-line
96    #:remove-keyword
97    #:remove-keywords
98    #:append-sublists
99    #:alist-elem-p
100    #:alistp
101    #:get-alist
102    #:update-alist
103    #:alist-plist
104    #:plist-alist
105    #:update-plist
106    #:get-plist
107    #:flatten
108
109    ;; seq.lisp
110    #:nsubseq
111    
112    ;; math.lisp
113    #:ensure-integer
114    #:histogram
115    #:fixnum-width
116    
117    ;; macros.lisp
118    #:time-iterations
119    #:in
120    #:mean
121    #:with-gensyms
122    #:let-if
123    #:let-when
124    #:aif
125    #:awhen
126    #:awhile
127    #:aand
128    #:acond
129    #:alambda
130    #:it
131    #:mac
132    #:mv-bind
133    #:deflex
134    #:def-cached-vector
135    #:def-cached-instance
136    
137    ;; files.lisp
138    #:print-file-contents
139    #:read-file-to-string
140    #:read-file-to-strings
141    
142    ;; strings.lisp
143    #:string-append
144    #:count-string-words
145    #:substitute-string-for-char
146    #:string-trim-last-character
147    #:nstring-trim-last-character
148    #:string-hash
149    #:is-string-empty
150    #:is-char-whitespace
151    #:not-whitespace-char
152    #:is-string-whitespace
153    #:string-invert
154    #:escape-xml-string
155    #:make-usb8-array
156    #:usb8-array-to-string
157    #:string-to-usb8-array
158    #:substitute-chars-strings
159    #:add-sql-quotes
160    #:escape-backslashes
161    #:concat-separated-strings
162    #:print-separated-strings
163    #:lex-string
164    #:split-alphanumeric-string
165    
166    ;; strmatch.lisp
167    #:score-multiword-match
168    #:multiword-match
169    
170    ;; symbols.lisp
171    #:ensure-keyword
172    #:concat-symbol
173    #:concat-symbol-pkg
174    #:show
175    #:show-variables
176    #:show-functions
177    
178    ;; From attrib-class.lisp
179    #:attributes-class
180    #:slot-attribute
181    #:slot-attributes
182
183    #:generalized-equal
184
185    ;; From buffered input
186    
187    #:make-fields-buffer
188    #:read-buffered-fields
189    
190    ;; From datetime.lisp
191    #:pretty-date
192    #:date-string
193    #:print-float-units
194    #:print-seconds
195    
196    ;; From random.lisp
197    #:seed-random-generator
198    #:random-choice
199    
200    ;; From repl.lisp
201    #:make-repl
202    #:init/repl
203    
204    ;; From web-utils
205    #:*base-url*
206    #:base-url!
207    #:make-url
208    #:*standard-html-header*
209    #:*standard-xhtml-header*
210    #:*standard-xml-header*
211    #:user-agent-ie-p
212    #:decode-uri-query-string
213    
214    ;; From xml-utils
215    #:wrap-with-xml
216    #:xml-tag-contents
217    #:positions-xml-tag-contents
218    #:xml-cdata
219    #:write-xml-cdata
220    
221    ;; From console
222    #:*console-msgs*
223    #:cmsg
224    #:cmsg-c
225    #:cmsg-add
226    #:cmsg-remove
227    #:fixme
228
229    ;; byte-stream
230    #:make-binary-array-output-stream
231    #:get-output-stream-data
232    #:dump-output-stream-data
233    #:make-byte-array-input-stream
234
235    ;; sockets.lisp
236    #:make-active-socket
237    #:close-active-socket
238    
239    ;; listener.lisp
240    #:init/listener
241    #:stop-all/listener
242    #:listener
243    
244    ;; fformat.lisp
245    #:fformat
246
247    ;; os.lisp
248    #:run-shell-command
249
250    ;; color.lisp
251    #:rgb->hsv
252    #:rgb255->hsv255
253    #:hsv->rgb
254    #:hsv255->rgb255
255    #:hsv-equal
256    #:hsv255-equal
257    #:hsv-similar
258    #:hsv255-similar
259    #:hue-difference
260    #:hue-difference-fixnum
261    ))
262
263
264