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.18 2002/12/26 11:57:07 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
  76           ;; strings.lisp
  77           #:string-append
  78           #:count-string-words
  79           #:substitute-string-for-char
  80           #:string-trim-last-character
  81           #:string-hash
  82           #:string-not-null?
  83           #:whitespace?
  84           #:not-whitespace?
  85           #:string-ws?
  86           #:string-invert
  87           #:escape-xml-string
  88           #:string-replace-char-string
  89
  90           ;; symbols.lisp
  91           #:ensure-keyword
  92           #:concat-symbol
  93           #:concat-symbol-pkg
  94
  95           ;; From attrib-class.lisp
  96           #:attributes-class
  97           #:slot-attribute
  98
  99           #:generalized-equal
 100
 101           ;; From buffered input
 102
 103           #:make-fields-buffer
 104           #:read-buffered-fields
 105
 106           #:pretty-date
 107           #:date-string
 108
 109           ;; From random.lisp
 110           #:seed-random-generator
 111           #:random-choice
 112
 113           ;; From telnet-server.lisp
 114           #:start-telnet-server
 115
 116           ;; From web-utils
 117           #:*base-url*
 118           #:base-url!
 119           #:make-url
 120           #:*standard-html-header*
 121           #:*standard-xhtml-header*
 122           #:*standard-xml-header*
 123           #:user-agent-ie-p
 124
 125           ;; From xml-utils
 126           #:wrap-with-xml
 127           #:xml-tag-contents
 128           #:positions-xml-tag-contents
 129           #:xml-cdata
 130
 131           ;; From console
 132           *console-msgs*
 133           cmsg
 134           cmsg-c
 135           cmsg-add
 136           cmsg-remove
 137           fixme
 138           ))
 139
 140
 141