packages.lisp - clic - Clic is an command line interactive client for gopher written in Common LISP (HTM) git clone git://bitreich.org/clic/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/clic/ (DIR) Log (DIR) Files (DIR) Refs (DIR) Tags (DIR) README (DIR) LICENSE --- packages.lisp (3633B) --- 1 ;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-USER; Base: 10 -*- 2 ;;; $Header: /usr/local/cvsrep/flexi-streams/packages.lisp,v 1.39 2008/05/30 07:50:31 edi Exp $ 3 4 ;;; Copyright (c) 2005-2008, Dr. Edmund Weitz. All rights reserved. 5 6 ;;; Redistribution and use in source and binary forms, with or without 7 ;;; modification, are permitted provided that the following conditions 8 ;;; are met: 9 10 ;;; * Redistributions of source code must retain the above copyright 11 ;;; notice, this list of conditions and the following disclaimer. 12 13 ;;; * Redistributions in binary form must reproduce the above 14 ;;; copyright notice, this list of conditions and the following 15 ;;; disclaimer in the documentation and/or other materials 16 ;;; provided with the distribution. 17 18 ;;; THIS SOFTWARE IS PROVIDED BY THE AUTHOR 'AS IS' AND ANY EXPRESSED 19 ;;; OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 20 ;;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 21 ;;; ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY 22 ;;; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 23 ;;; DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE 24 ;;; GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 25 ;;; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 26 ;;; WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING 27 ;;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS 28 ;;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 29 30 (in-package :cl-user) 31 32 (unless (find-symbol (symbol-name :stream-file-position) :trivial-gray-streams) 33 (error "You need a newer version of TRIVIAL-GRAY-STREAMS.")) 34 35 (defpackage :flexi-streams 36 (:use :cl :trivial-gray-streams) 37 (:nicknames :flex) 38 (:shadow #+:lispworks :with-accessors 39 :defconstant) 40 (:export :*default-eol-style* 41 :*default-little-endian* 42 :*substitution-char* 43 :accept-overlong-sequence 44 :char-length 45 :external-format-condition 46 :external-format-condition-external-format 47 :external-format-eol-style 48 :external-format-error 49 :external-format-encoding-error 50 :external-format-equal 51 :external-format-id 52 :external-format-little-endian 53 :external-format-name 54 :flexi-input-stream 55 :flexi-output-stream 56 :flexi-io-stream 57 :flexi-stream 58 :flexi-stream-bound 59 :flexi-stream-column 60 :flexi-stream-external-format 61 :flexi-stream-element-type 62 :flexi-stream-element-type-error 63 :flexi-stream-element-type-error-element-type 64 :flexi-stream-error 65 :flexi-stream-out-of-sync-error 66 :flexi-stream-position 67 :flexi-stream-stream 68 :get-output-stream-sequence 69 :in-memory-stream 70 :in-memory-stream-closed-error 71 :in-memory-stream-error 72 :in-memory-stream-position-spec-error 73 :in-memory-stream-position-spec-error-position-spec 74 :in-memory-input-stream 75 :in-memory-output-stream 76 :list-stream 77 :make-external-format 78 :make-in-memory-input-stream 79 :make-in-memory-output-stream 80 :make-flexi-stream 81 :octet 82 :octet-length 83 :octets-to-string 84 :output-stream-sequence-length 85 :peek-byte 86 :string-to-octets 87 :unread-byte 88 :vector-stream 89 :with-input-from-sequence 90 :with-output-to-sequence))