Coverage report: /home/ellis/comp/core/ffi/gstreamer/debug.lisp

KindCoveredAll%
expression110 10.0
branch00nil
Key
Not instrumented
Conditionalized out
Executed
Not executed
 
Both branches taken
One branch taken
Neither branch taken
1
 ;;; debug.lisp --- Gstreamer FFI Debugging
2
 
3
 ;; 
4
 
5
 ;;; Code:
6
 (in-package :gstreamer)
7
 
8
 (define-alien-enum (gst-debug-graph-details int)
9
                    :show-media-type (ash 1 0)
10
                    :show-caps-details (ash 1 1)
11
                    :show-non-default-params (ash 1 2)
12
                    :show-states (ash 1 3)
13
                    :show-full-params (ash 1 4)
14
                    :show-all (- (ash 1 4) 1)
15
                    :show-verbose #xffffffff)
16
 
17
 (defar gst-debug-bin-to-dot-data c-string
18
   (bin (* gst-bin))
19
   (details gst-debug-graph-details))
20
 
21
 (define-alien-enum (gst-debug-level int)
22
                    :none 0
23
                    :error 1
24
                    :warning 2
25
                    :fixme 3
26
                    :info 4
27
                    :debug 5
28
                    :log 6
29
                    :trace 7
30
                    :memdump 9
31
                    :level-count 10)
32
 
33
 (defvar *gst-level-default* (gst-debug-level :none))
34
 
35
 (defvar *gst-level-max* (gst-debug-level :level-count))