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