Coverage report: /home/ellis/comp/core/lib/dsp/proto.lisp

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

Key

Not instrumented

Conditionalized out

Executed

Not executed

Both branches taken

One branch taken

Neither branch taken

1

;;; proto.lisp --- DSP and Media Protocols

2

3

;;

4

5

;;; Code:

6

(in-package :dsp/core)

7

8

(define-condition dsp-condition () ())

9

10

(define-condition dsp-error (dsp-condition) ())

11

12

(defclass media-codec (id)

13

((name :initarg :name :accessor name)))

14

15

(defclass audio-codec (media-codec)

16

((sample-rate :initarg :sample-rate)

17

(sample-format :initarg :sample-format)))

18

19

(defclass video-codec (media-codec)

20

((pix-format)

21

(frame-rate)

22

(color-range)

23

(color-space)))

24

25

(defclass media-meta ()

26

((metadata :initarg :metadata)

27

(mime-type :initarg :mime-type :type mime-type)))

28

29

(defclass av-meta (media-meta)

30

((duration :initarg :duration)

31

(bitrate :initarg :bitrate)

32

(codec :initarg :codec :type media-codec)))

33

34

(defclass media-file (media-meta)

35

((path :initarg :path :accessor path)))

36

37

(defclass audio-file (av-meta media-file) ())

38

(defclass video-file (av-meta media-file) ())

39

(defclass image-file (media-file) ())

40

41

(defconfig audio-config () ())

42

(defconfig audio-system-config (audio-config) ())

43

(defconfig video-config () ())

44

(defconfig video-system-config (video-config) ())