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