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