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-substitute
  55    #:string-to-list-skip-delimiter
  56    #:string-starts-with
  57    #:count-string-char
  58    #:count-string-char-if
  59    #:hexchar
  60    #:encode-uri-string
  61    #:decode-uri-string
  62    #:non-alphanumericp
  63    #:random-string
  64    #:first-char
  65    #:last-char
  66    #:ensure-string
  67    #:string-right-trim-one-char
  68    #:string-strip-ending
  69    #:string-maybe-shorten
  70    #:string-elide
  71    #:shrink-vector
  72    #:collapse-whitespace
  73    #:string->list
  74
  75    ;; io.lisp
  76    #:indent-spaces
  77    #:indent-html-spaces
  78    #:print-n-chars
  79    #:print-n-strings
  80    #:print-list
  81    #:print-rows
  82    #:write-fixnum
  83    #:file-subst
  84    #:stream-subst
  85    #:null-output-stream
  86    #:directory-tree
  87
  88    ;; impl.lisp
  89    #:probe-directory
  90    #:cwd
  91    #:quit
  92    #:command-line-arguments
  93    #:shell-command-output
  94
  95    ;; lists.lisp
  96    #:remove-from-tree-if
  97    #:find-tree
  98    #:with-each-file-line
  99    #:with-each-stream-line
 100    #:remove-keyword
 101    #:remove-keywords
 102    #:append-sublists
 103    #:alist-elem-p
 104    #:alistp
 105    #:get-alist
 106    #:update-alist
 107    #:alist-plist
 108    #:plist-alist
 109    #:update-plist
 110    #:get-plist
 111    #:flatten
 112
 113    ;; seq.lisp
 114    #:nsubseq
 115
 116    ;; math.lisp
 117    #:ensure-integer
 118    #:histogram
 119    #:fixnum-width
 120    #:scaled-epsilon
 121
 122    ;; macros.lisp
 123    #:time-iterations
 124    #:in
 125    #:mean
 126    #:with-gensyms
 127    #:let-if
 128    #:let-when
 129    #:aif
 130    #:awhen
 131    #:awhile
 132    #:aand
 133    #:acond
 134    #:alambda
 135    #:it
 136    #:mac
 137    #:mv-bind
 138    #:deflex
 139    #:def-cached-vector
 140    #:def-cached-instance
 141    #:with-ignore-errors
 142    #:ppmx
 143    #:defconst
 144
 145    ;; files.lisp
 146    #:print-file-contents
 147    #:read-stream-to-string
 148    #:read-file-to-string
 149    #:read-stream-to-strings
 150    #:read-file-to-strings
 151
 152    ;; strings.lisp
 153    #:string-append
 154    #:count-string-words
 155    #:substitute-string-for-char
 156    #:string-trim-last-character
 157    #:nstring-trim-last-character
 158    #:string-hash
 159    #:is-string-empty
 160    #:is-char-whitespace
 161    #:not-whitespace-char
 162    #:is-string-whitespace
 163    #:string-invert
 164    #:escape-xml-string
 165    #:make-usb8-array
 166    #:usb8-array-to-string
 167    #:string-to-usb8-array
 168    #:substitute-chars-strings
 169    #:add-sql-quotes
 170    #:escape-backslashes
 171    #:concat-separated-strings
 172    #:print-separated-strings
 173    #:lex-string
 174    #:split-alphanumeric-string
 175
 176    ;; strmatch.lisp
 177    #:score-multiword-match
 178    #:multiword-match
 179
 180    ;; symbols.lisp
 181    #:ensure-keyword
 182    #:ensure-keyword-upcase
 183    #:ensure-keyword-default-case
 184    #:concat-symbol
 185    #:concat-symbol-pkg
 186    #:show
 187    #:show-variables
 188    #:show-functions
 189
 190    ;; From attrib-class.lisp
 191    #:attributes-class
 192    #:slot-attribute
 193    #:slot-attributes
 194
 195    #:generalized-equal
 196
 197    ;; From buffered input
 198
 199    #:make-fields-buffer
 200    #:read-buffered-fields
 201
 202    ;; From datetime.lisp
 203    #:pretty-date
 204    #:date-string
 205    #:print-float-units
 206    #:print-seconds
 207    #:posix-time-to-utime
 208
 209    ;; From random.lisp
 210    #:seed-random-generator
 211    #:random-choice
 212
 213    ;; From repl.lisp
 214    #:make-repl
 215    #:init/repl
 216
 217    ;; From web-utils
 218    #:*base-url*
 219    #:base-url!
 220    #:make-url
 221    #:*standard-html-header*
 222    #:*standard-xhtml-header*
 223    #:*standard-xml-header*
 224    #:user-agent-ie-p
 225    #:decode-uri-query-string
 226    #:split-uri-query-string
 227
 228    ;; From xml-utils
 229    #:sgml-header-stream
 230    #:xml-tag-contents
 231    #:positions-xml-tag-contents
 232    #:cdata-string
 233    #:write-cdata
 234
 235    ;; From console
 236    #:*console-msgs*
 237    #:cmsg
 238    #:cmsg-c
 239    #:cmsg-add
 240    #:cmsg-remove
 241    #:fixme
 242
 243    ;; byte-stream
 244    #:make-binary-array-output-stream
 245    #:get-output-stream-data
 246    #:dump-output-stream-data
 247    #:make-byte-array-input-stream
 248
 249    ;; sockets.lisp
 250    #:make-active-socket
 251    #:close-active-socket
 252
 253    ;; listener.lisp
 254    #:init/listener
 255    #:stop-all/listener
 256    #:listener
 257
 258    ;; fformat.lisp
 259    #:fformat
 260
 261    ;; os.lisp
 262    #:command-output
 263    #:run-shell-command-output-stream
 264
 265    ;; color.lisp
 266    #:rgb->hsv
 267    #:rgb255->hsv255
 268    #:hsv->rgb
 269    #:hsv255->rgb255
 270    #:hsv-equal
 271    #:hsv255-equal
 272    #:hsv-similar
 273    #:hsv255-similar
 274    #:hue-difference
 275    #:hue-difference-fixnum
 276    ))
 277
 278
 279