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