package.lisp

   1 ;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: CL-USER; -*-
   2 ;;; ---------------------------------------------------------------------------
   3 ;;;     Title: Generating a sane DEFPACKAGE for RUNES
   4 ;;;   Created: 1999-05-25
   5 ;;;    Author: Gilbert Baumann <unk6@rz.uni-karlsruhe.de>
   6 ;;; ---------------------------------------------------------------------------
   7 ;;;  (c) copyright 1999,2000 by Gilbert Baumann
   8
   9 (in-package :cl-user)
  10
  11 (defpackage :runes
  12   (:use :cl)
  13   (:export #:definline
  14
  15            ;; runes.lisp
  16            #:rune
  17            #:rod
  18            #:simple-rod
  19            #:%rune
  20            #:rod-capitalize
  21            #:code-rune
  22            #:rune-code
  23            #:rune-downcase
  24            #:rune-upcase
  25            #:rod-downcase
  26            #:rod-upcase
  27            #:white-space-rune-p
  28            #:digit-rune-p
  29            #:rune=
  30            #:rune<=
  31            #:rune>=
  32            #:rune-equal
  33            #:runep
  34            #:sloopy-rod-p
  35            #:rod=
  36            #:rod-equal
  37            #:make-rod
  38            #:char-rune
  39            #:rune-char
  40            #:rod-string
  41            #:string-rod
  42            #:rod-subseq
  43            #:rod<
  44
  45            ;; xstream.lisp
  46            #:make-xstream
  47            #:make-rod-xstream
  48            #:close-xstream
  49            #:xstream-p
  50            #:read-rune
  51            #:peek-rune
  52            #:fread-rune
  53            #:fpeek-rune
  54            #:consume-rune
  55            #:unread-rune
  56            #:xstream-position
  57            #:xstream-line-number
  58            #:xstream-column-number
  59            #:xstream-plist
  60            #:xstream-encoding
  61            #:set-to-full-speed
  62            #:xstream-name))
  63
  64 (defpackage :runes-encoding
  65   (:use :cl :runes)
  66   (:export
  67    #:encoding-error
  68    #:find-encoding
  69    #:decode-sequence))