Coverage report: /home/ellis/.cache/common-lisp/sbcl-2.5.6.74-df9f98a0a-linux-x64/home/ellis/comp/core/ffi/zstd/constants.lisp-temp

KindCoveredAll%
expression249 4.1
branch00nil
Key
Not instrumented
Conditionalized out
Executed
Not executed
 
Both branches taken
One branch taken
Neither branch taken
1
 (cl:in-package #:ZSTD)
2
 (cl:eval-when (:compile-toplevel :execute)
3
   (cl:defparameter *integer-sizes* (cl:make-hash-table))
4
   (cl:setf (cl:gethash 1 *integer-sizes*) 'sb-alien:char)
5
   (cl:setf (cl:gethash 2 *integer-sizes*) 'sb-alien:short)
6
   (cl:setf (cl:gethash 8 *integer-sizes*) 'sb-alien:long-long)
7
   (cl:setf (cl:gethash 8 *integer-sizes*) 'sb-alien:long)
8
   (cl:setf (cl:gethash 4 *integer-sizes*) 'sb-alien:int)
9
 )
10
 (cl:defconstant +ZSTD-VERSION-MAJOR+ 1 "T")
11
 (cl:export '+ZSTD-VERSION-MAJOR+)
12
 (cl:defconstant +ZSTD-VERSION-MINOR+ 5 "T")
13
 (cl:export '+ZSTD-VERSION-MINOR+)
14
 (cl:defconstant +ZSTD-VERSION-RELEASE+ 7 "T")
15
 (cl:export '+ZSTD-VERSION-RELEASE+)
16
 (cl:defconstant +ZSTD-VERSION-NUMBER+ 10507 "T")
17
 (cl:export '+ZSTD-VERSION-NUMBER+)
18
 (cl:defconstant +ZSTD-CLEVEL-DEFAULT+ 3 "T")
19
 (cl:export '+ZSTD-CLEVEL-DEFAULT+)
20
 (cl:defconstant +ZSTD-MAGICNUMBER+ -47205080 "T")
21
 (cl:export '+ZSTD-MAGICNUMBER+)
22
 (cl:defconstant +ZSTD-MAGIC-DICTIONARY+ -332356553 "T")
23
 (cl:export '+ZSTD-MAGIC-DICTIONARY+)
24
 (cl:defconstant +ZSTD-MAGIC-SKIPPABLE-START+ 407710288 "T")
25
 (cl:export '+ZSTD-MAGIC-SKIPPABLE-START+)
26
 (cl:defconstant +ZSTD-BLOCKSIZELOG-MAX+ 17 "T")
27
 (cl:export '+ZSTD-BLOCKSIZELOG-MAX+)
28
 (cl:defconstant +ZSTD-BLOCKSIZE-MAX+ 131072 "T")
29
 (cl:export '+ZSTD-BLOCKSIZE-MAX+)
30
 (cl:defconstant +ZSTD-CONTENTSIZE-UNKNOWN+ -1 "T")
31
 (cl:export '+ZSTD-CONTENTSIZE-UNKNOWN+)
32
 (cl:defconstant +ZSTD-CONTENTSIZE-ERROR+ -2 "T")
33
 (cl:export '+ZSTD-CONTENTSIZE-ERROR+)
34
 (cl:defconstant +ZSTD-MAX-INPUT-SIZE+ -71777214294589696 "T")
35
 (cl:export '+ZSTD-MAX-INPUT-SIZE+)
36
 (sb-grovel::define-c-struct ZSTD-INBUFFER 24
37
  (SRC (* T) "const void*"
38
   0
39
   8)
40
  (SIZE SIZE-T "size_t"
41
   8
42
   8)
43
  (POS SIZE-T "size-t"
44
   16
45
   8)
46
 )
47
 (cl:export 'ZSTD-INBUFFER)
48
 (sb-grovel::define-c-struct ZSTD-OUTBUFFER 24
49
  (DST (* T) "void*"
50
   0
51
   8)
52
  (SIZE SIZE-T "size_t"
53
   8
54
   8)
55
  (POS SIZE-T "size-t"
56
   16
57
   8)
58
 )
59
 (cl:export 'ZSTD-OUTBUFFER)
60
 (sb-grovel::define-c-struct ZDICT-PARAMS 12
61
  (COMPRESSION-LEVEL INT "int"
62
   0
63
   4)
64
  (NOTIFICATION-LEVEL UNSIGNED "unsigned"
65
   4
66
   4)
67
  (DICT-ID UNSIGNED "unsigned"
68
   8
69
   4)
70
 )
71
 (cl:export 'ZDICT-PARAMS)