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