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

Kind	Covered	All	%
expression	0	11	0.0
branch	0	0	nil

Key

Not instrumented

Conditionalized out

Executed

Not executed

Both branches taken

One branch taken

Neither branch taken

1

;;; object.lisp --- Gstreamer FFI Objects

2

3

;;

4

5

;;; Code:

6

(in-package :gstreamer)

7

8

(define-alien-enum (gst-object-flags int)

9

:may-be-leaked (ash 1 0)

10

:constructed (ash 1 1)

11

:last (ash 1 4))

12

13

(define-alien-type gst-object

14

(struct gst-object

15

(object ginitially-unowned)

16

(lock gmutex)

17

(name c-string)

18

;; (* gst-object)

19

(parent (* t))

20

(flags (unsigned 32))

21

(control-bindings (* glist))

22

(control-rate (unsigned 64))

23

(last-sync (unsigned 64))

24

(%gst-reserved gpointer)))

25

26

(define-opaque gst-object-class)

27

28

(defar gst-object-ref gpointer (object gpointer))

29

(defar gst-object-unref void (object gpointer))

30

(defar gst-clear-object void (* (* gst-object)))

31

(defar gst-object-ref-sink gpointer (object gpointer))

32

(defar gst-object-replace boolean (old (* (* gst-object))) (new (* gst-object)))

33

(defar gst-object-get-path-string c-string (object (* gst-object)))

34

(defar gst-object-check-uniqueness boolean (list (* glist)) (name c-string))

35