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

KindCoveredAll%
expression040 0.0
branch00nil
Key
Not instrumented
Conditionalized out
Executed
Not executed
 
Both branches taken
One branch taken
Neither branch taken
1
 (cl:in-package #:BTRFS)
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
 (sb-grovel::define-c-struct BTRFS-UTIL-SUBVOLUME-INFO 184
11
  (ID UNSIGNED-LONG "uint64_t"
12
   0
13
   8)
14
  (PARENT-ID UNSIGNED-LONG "uint64_t"
15
   8
16
   8)
17
  (DIR-ID UNSIGNED-LONG "uint64_t"
18
   16
19
   8)
20
  (FLAGS UNSIGNED-LONG "uint64_t"
21
   24
22
   8)
23
  (UUID (ARRAY CHAR) "uint8_t"
24
   32
25
   16)
26
  (PARENT-UUID (ARRAY CHAR) "uint8_t"
27
   48
28
   16)
29
  (RECEIVED-UUID (ARRAY CHAR) "uint8_t"
30
   64
31
   16)
32
  (GENERATION UNSIGNED-LONG "uint64_t"
33
   80
34
   8)
35
  (CTRANSID UNSIGNED-LONG "uint64_t"
36
   88
37
   8)
38
  (OTRANSID UNSIGNED-LONG "uint64_t"
39
   96
40
   8)
41
  (RTRANSID UNSIGNED-LONG "uint64_t"
42
   112
43
   8)
44
  (CTIME (* T) "struct timespec"
45
   120
46
   16)
47
  (OTIME (* T) "struct timespec"
48
   136
49
   16)
50
  (STIME (* T) "struct timespec"
51
   152
52
   16)
53
  (RTIME (* T) "struct timespec"
54
   168
55
   16)
56
 )
57
 (cl:export 'BTRFS-UTIL-SUBVOLUME-INFO)
58
 (cl:defconstant +BTRFS-LIB-MAJOR+ 0 "T")
59
 (cl:export '+BTRFS-LIB-MAJOR+)
60
 (cl:defconstant +BTRFS-LIB-MINOR+ 1 "T")
61
 (cl:export '+BTRFS-LIB-MINOR+)
62
 (cl:defconstant +BTRFS-LIB-PATCHLEVEL+ 4 "T")
63
 (cl:export '+BTRFS-LIB-PATCHLEVEL+)
64
 (cl:defconstant +BTRFS-LIB-VERSION+ 104 "T")
65
 (cl:export '+BTRFS-LIB-VERSION+)
66
 (cl:defconstant +BTRFS-SUBVOL-RDONLY+ 2 "T")
67
 (cl:export '+BTRFS-SUBVOL-RDONLY+)
68
 (cl:defconstant +BTRFS-SUBVOL-QGROUP-INHERIT+ 4 "T")
69
 (cl:export '+BTRFS-SUBVOL-QGROUP-INHERIT+)
70
 (cl:defconstant +BTRFS-DEVICE-SPEC-BY-ID+ 8 "T")
71
 (cl:export '+BTRFS-DEVICE-SPEC-BY-ID+)
72
 (cl:defconstant +BTRFS-SUBVOL-SPEC-BY-ID+ 16 "T")
73
 (cl:export '+BTRFS-SUBVOL-SPEC-BY-ID+)
74
 (cl:defconstant +BTRFS-VOL-ARG-V2-FLAGS-SUPPORTED+ 30 "T")
75
 (cl:export '+BTRFS-VOL-ARG-V2-FLAGS-SUPPORTED+)
76
 (cl:defconstant +BTRFS-FSIZE-SIZE+ 16 "T")
77
 (cl:export '+BTRFS-FSIZE-SIZE+)
78
 (cl:defconstant +BTRFS-QGROUP-INHERIT-SET-LIMITS+ 1 "T")
79
 (cl:export '+BTRFS-QGROUP-INHERIT-SET-LIMITS+)
80
 (sb-grovel::define-c-struct BTRFS-QGROUP-LIMIT 40
81
  (FLAGS (UNSIGNED 64) "__u64"
82
   0
83
   8)
84
  (MAX-REFERENCED (UNSIGNED 64) "__u64"
85
   8
86
   8)
87
  (MAX-EXCLUSIVE (UNSIGNED 64) "__u64"
88
   16
89
   8)
90
  (RSV-REFERENCED (UNSIGNED 64) "__u64"
91
   24
92
   8)
93
  (RSV-EXCLUSIVE (UNSIGNED 64) "__u64"
94
   32
95
   8)
96
 )
97
 (cl:export 'BTRFS-QGROUP-LIMIT)