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