Coverage report: /home/ellis/.stash/quicklisp/dists/ultralisp/software/edicl-flexi-streams-20240429143708/packages.lisp

Kind	Covered	All	%
expression	0	9	0.0
branch	0	2	0.0

Key

Not instrumented

Conditionalized out

Executed

Not executed

Both branches taken

One branch taken

Neither branch taken

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

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))