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