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.52 2003/07/19 20:32:48 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 (in-package #:cl-user)
  20
  21 (defpackage #:kmrcl
  22   (:nicknames #:kl)
  23   (:use #:cl)
  24   (:export
  25    #:ensure-integer
  26    #:mklist
  27    #:filter
  28    #:appendnew
  29    #:memo-proc
  30    #:memoize
  31    #:defun-memo
  32    #:_f
  33    #:compose
  34    #:until
  35    #:while
  36    #:for
  37
  38    ;; strings.lisp
  39    #:mapappend
  40    #:mapcar-append-string
  41    #:mapcar2-append-string
  42    #:position-char
  43    #:position-not-char
  44    #:delimited-string-to-list
  45    #:string-delimited-string-to-list
  46    #:list-to-delimited-string
  47    #:prefixed-fixnum-string
  48    #:integer-string
  49    #:fast-string-search
  50    #:string-to-list-skip-delimiter
  51    #:string-starts-with
  52    #:count-string-char
  53    #:count-string-char-if
  54    #:hexchar
  55    #:escape-uri-field
  56    #:unescape-uri-field
  57    #:non-alphanumericp
  58    #:random-string
  59    #:first-char
  60    #:last-char
  61    #:ensure-string
  62    #:string-right-trim-one-char
  63    #:string-strip-ending
  64    #:string-maybe-shorten
  65    #:shrink-vector
  66
  67    #:flatten
  68
  69    ;; io.lisp
  70    #:indent-spaces
  71    #:indent-html-spaces
  72    #:print-n-chars
  73    #:print-n-strings
  74    #:print-list
  75    #:print-rows
  76    #:write-fixnum
  77    #:file-subst
  78    #:stream-subst
  79    #:null-output-stream
  80
  81    ;; lists.lisp
  82    #:remove-tree-if
  83    #:find-tree
  84    #:with-each-file-line
  85    #:with-each-stream-line
  86    #:remove-keyword
  87    #:remove-keywords
  88    #:append-sublists
  89    #:alist-elem-p
  90    #:alistp
  91    #:get-alist
  92    #:update-alist
  93    #:alist-plist
  94    #:plist-alist
  95    #:update-plist
  96    #:get-plist
  97
  98    ;; seq.lisp
  99    #:nsubseq
 100
 101    ;; math.lisp
 102    #:ensure-integer
 103
 104    ;; macros.lisp
 105    #:time-iterations
 106    #:in
 107    #:mean
 108    #:with-gensyms
 109    #:let-if
 110    #:let-when
 111    #:aif
 112    #:awhen
 113    #:awhile
 114    #:aand
 115    #:acond
 116    #:alambda
 117    #:it
 118    #:mac
 119    #:mv-bind
 120
 121    ;; files.lisp
 122    #:print-file-contents
 123    #:read-file-to-string
 124    #:read-file-to-strings
 125
 126    ;; strings.lisp
 127    #:string-append
 128    #:count-string-words
 129    #:substitute-string-for-char
 130    #:string-trim-last-character
 131    #:nstring-trim-last-character
 132    #:string-hash
 133    #:string-not-null?
 134    #:whitespace?
 135    #:not-whitespace?
 136    #:string-ws?
 137    #:string-invert
 138    #:escape-xml-string
 139    #:make-usb8-array
 140    #:usb8-array-to-string
 141    #:string-to-usb8-array
 142    #:substitute-chars-strings
 143    #:add-sql-quotes
 144    #:escape-backslashes
 145    #:concat-separated-strings
 146    #:print-separated-strings
 147
 148    ;; symbols.lisp
 149    #:ensure-keyword
 150    #:concat-symbol
 151    #:concat-symbol-pkg
 152    #:show
 153    #:show-variables
 154    #:show-functions
 155
 156    ;; From attrib-class.lisp
 157    #:attributes-class
 158    #:slot-attribute
 159    #:slot-attributes
 160
 161    #:generalized-equal
 162
 163    ;; From buffered input
 164
 165    #:make-fields-buffer
 166    #:read-buffered-fields
 167
 168    ;; From datetime.lisp
 169    #:pretty-date
 170    #:date-string
 171    #:print-float-units
 172    #:print-seconds
 173
 174    ;; From random.lisp
 175    #:seed-random-generator
 176    #:random-choice
 177
 178    ;; From repl.lisp
 179    #:make-repl
 180    #:init/repl
 181
 182    ;; From web-utils
 183    #:*base-url*
 184    #:base-url!
 185    #:make-url
 186    #:*standard-html-header*
 187    #:*standard-xhtml-header*
 188    #:*standard-xml-header*
 189    #:user-agent-ie-p
 190    #:decode-uri-query-string
 191
 192    ;; From xml-utils
 193    #:wrap-with-xml
 194    #:xml-tag-contents
 195    #:positions-xml-tag-contents
 196    #:xml-cdata
 197    #:write-xml-cdata
 198
 199    ;; From console
 200    #:*console-msgs*
 201    #:cmsg
 202    #:cmsg-c
 203    #:cmsg-add
 204    #:cmsg-remove
 205    #:fixme
 206
 207    ;; byte-stream
 208    #:make-binary-array-output-stream
 209    #:get-output-stream-data
 210    #:dump-output-stream-data
 211    #:make-byte-array-input-stream
 212
 213    ;; sockets.lisp
 214    #:make-active-socket
 215    #:close-active-socket
 216
 217    ;; listener.lisp
 218    #:init/listener
 219    #:stop-all/listener
 220    #:listener
 221
 222    ;; fformat.lisp
 223    #:fformat
 224
 225    ))
 226
 227
 228