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