a2d3e28636dc84ebf82ca463294bf6b429fbd3dd
[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.26 2003/05/05 21:36:50 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    #:flatten
45    #:indent-spaces
46    #:print-list
47    #:print-rows
48    #:file-subst
49    #:stream-subst
50    #:remove-tree-if
51    #:find-tree
52    #:with-each-file-line
53    #:with-each-stream-line
54    #:remove-keyword
55    #:remove-keywords
56    #:nsubseq
57    
58    ;; macros.lisp
59    #:time-iterations
60    #:in
61    #:mean
62    #:with-gensyms
63    #:let-if
64    #:let-when
65    #:aif
66    #:awhen
67    #:awhile
68    #:aand
69    #:acond
70    #:alambda
71    #:it
72    #:mac
73    
74    ;; files.lisp
75    #:print-file-contents
76    #:read-file-to-string
77    #:read-file-to-strings
78    
79    ;; strings.lisp
80    #:string-append
81    #:count-string-words
82    #:substitute-string-for-char
83    #:string-trim-last-character
84    #:nstring-trim-last-character
85    #:string-hash
86    #:string-not-null?
87    #:whitespace?
88    #:not-whitespace?
89    #:string-ws?
90    #:string-invert
91    #:escape-xml-string
92    #:make-usb8-array
93    #:usb8-array-to-string
94    #:string-to-usb8-array
95    #:substitute-chars-strings
96    #:add-sql-quotes
97    #:escape-backslashes
98    
99    ;; symbols.lisp
100    #:ensure-keyword
101    #:concat-symbol
102    #:concat-symbol-pkg
103    #:show
104    #:show-variables
105    #:show-functions
106    
107    ;; From attrib-class.lisp
108    #:attributes-class
109    #:slot-attribute
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