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.30 2003/05/09 09:35:04 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 (declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
  20
  21 (in-package :cl-user)
  22
  23 (defpackage #:kmrcl
  24   (:nicknames :kl)
  25   (:use :common-lisp)
  26   (:export
  27    #:ensure-integer
  28    #:mklist
  29    #:filter
  30    #:appendnew
  31    #:memo-proc
  32    #:memoize
  33    #:defun-memo
  34    #:_f
  35    #:compose
  36    #:until
  37    #:while
  38    #:for
  39
  40    ;; strings.lisp
  41    #:mapappend
  42    #:mapcar-append-string
  43    #:mapcar2-append-string
  44    #:position-char
  45    #:delimited-string-to-list
  46    #:list-to-delimited-string
  47    #:flatten
  48
  49    #:indent-spaces
  50    #:print-n-chars
  51    #:print-list
  52    #:print-rows
  53    #:file-subst
  54    #:stream-subst
  55
  56    ;; lists.lisp
  57    #:remove-tree-if
  58    #:find-tree
  59    #:with-each-file-line
  60    #:with-each-stream-line
  61    #:remove-keyword
  62    #:remove-keywords
  63    #:append-sublists
  64
  65    #:nsubseq
  66    ;; math.lisp
  67    #:ensure-integer
  68
  69    ;; macros.lisp
  70    #:time-iterations
  71    #:in
  72    #:mean
  73    #:with-gensyms
  74    #:let-if
  75    #:let-when
  76    #:aif
  77    #:awhen
  78    #:awhile
  79    #:aand
  80    #:acond
  81    #:alambda
  82    #:it
  83    #:mac
  84
  85    ;; files.lisp
  86    #:print-file-contents
  87    #:read-file-to-string
  88    #:read-file-to-strings
  89
  90    ;; strings.lisp
  91    #:string-append
  92    #:count-string-words
  93    #:substitute-string-for-char
  94    #:string-trim-last-character
  95    #:nstring-trim-last-character
  96    #:string-hash
  97    #:string-not-null?
  98    #:whitespace?
  99    #:not-whitespace?
 100    #:string-ws?
 101    #:string-invert
 102    #:escape-xml-string
 103    #:make-usb8-array
 104    #:usb8-array-to-string
 105    #:string-to-usb8-array
 106    #:substitute-chars-strings
 107    #:add-sql-quotes
 108    #:escape-backslashes
 109    #:concat-separated-strings
 110    #:print-separated-strings
 111
 112    ;; symbols.lisp
 113    #:ensure-keyword
 114    #:concat-symbol
 115    #:concat-symbol-pkg
 116    #:show
 117    #:show-variables
 118    #:show-functions
 119
 120    ;; From attrib-class.lisp
 121    #:attributes-class
 122    #:slot-attribute
 123    #:generalized-equal
 124
 125    ;; From buffered input
 126
 127    #:make-fields-buffer
 128    #:read-buffered-fields
 129
 130    ;; From datetime.lisp
 131    #:pretty-date
 132    #:date-string
 133    #:print-float-units
 134    #:print-seconds
 135
 136    ;; From random.lisp
 137    #:seed-random-generator
 138    #:random-choice
 139
 140    ;; From telnet-server.lisp
 141    #:start-telnet-server
 142
 143    ;; From web-utils
 144    #:*base-url*
 145    #:base-url!
 146    #:make-url
 147    #:*standard-html-header*
 148    #:*standard-xhtml-header*
 149    #:*standard-xml-header*
 150    #:user-agent-ie-p
 151
 152    ;; From xml-utils
 153    #:wrap-with-xml
 154    #:xml-tag-contents
 155    #:positions-xml-tag-contents
 156    #:xml-cdata
 157
 158    ;; From console
 159    *console-msgs*
 160    cmsg
 161    cmsg-c
 162    cmsg-add
 163    cmsg-remove
 164    fixme
 165    ))
 166
 167
 168