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.15 2002/12/04 16:49:23 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           #:memo-proc
  43           #:memoize
  44           #:defun-memo
  45           #:_f
  46           #:compose
  47           #:until
  48           #:while
  49           #:for
  50           #:mapappend
  51           #:mapcar-append-string
  52           #:mapcar2-append-string
  53           #:delimited-string-to-list
  54           #:list-to-delimited-string
  55           #:string-append
  56           #:count-string-words
  57           #:substitute-string-for-char
  58           #:string-trim-last-character
  59           #:string-hash
  60           #:string-not-null?
  61           #:whitespace?
  62           #:not-whitespace?
  63           #:string-ws?
  64           #:string-invert
  65           #:indent-spaces
  66           #:print-list
  67           #:print-rows
  68           #:concat-symbol
  69           #:concat-symbol-pkg
  70           #:file-subst
  71           #:stream-subst
  72           #:remove-tree-if
  73           #:find-tree
  74           #:with-each-file-line
  75           #:with-each-stream-line
  76           #:print-file-contents
  77           #:read-file-to-string
  78           #:read-file-to-strings
  79           #:add-sql-quotes
  80           #:escape-backslashes
  81           #:remove-keyword
  82           #:remove-keywords
  83           #:in
  84           #:mean
  85           #:with-gensyms
  86
  87           ;; From attrib-class.lisp
  88           #:attributes-class
  89           #:slot-attribute
  90
  91           #:generalized-equal
  92
  93           ;; From buffered input
  94
  95           #:make-fields-buffer
  96           #:read-buffered-fields
  97
  98           #:pretty-date
  99           #:date-string
 100
 101           ;; From random.lisp
 102           #:seed-random-generator
 103           #:random-choice
 104
 105           ;; From telnet-server.lisp
 106           #:start-telnet-server
 107
 108           ;; From web-utils
 109           #:*base-url*
 110           #:base-url!
 111           #:make-url
 112           #:*standard-html-header*
 113           #:*standard-xhtml-header*
 114           #:*standard-xml-header*
 115           #:user-agent-ie-p
 116
 117           ;; From xml-utils
 118           #:wrap-with-xml
 119           #:xml-tag-contents
 120           #:positions-xml-tag-contents
 121           #:xml-cdata
 122           ))
 123
 124
 125