File Coverage

blib/lib/GStreamer1.pm
Criterion Covered Total %
statement 7 9 77.7
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 10 12 83.3


line stmt bran cond sub pod time code
1             # Copyright (c) 2014 Timm Murray
2             # All rights reserved.
3             #
4             # Redistribution and use in source and binary forms, with or without
5             # modification, are permitted provided that the following conditions are met:
6             #
7             # * Redistributions of source code must retain the above copyright notice,
8             # this list of conditions and the following disclaimer.
9             # * Redistributions in binary form must reproduce the above copyright
10             # notice, this list of conditions and the following disclaimer in the
11             # documentation and/or other materials provided with the distribution.
12             #
13             # THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
14             # AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
15             # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
16             # ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
17             # LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
18             # CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
19             # SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
20             # INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
21             # CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
22             # ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
23             # POSSIBILITY OF SUCH DAMAGE.
24             package GStreamer1;
25             $GStreamer1::VERSION = '0.002';
26 2     2   15348 use v5.12;
  2         6  
  2         67  
27 2     2   8 use warnings;
  2         2  
  2         53  
28 2     2   1150 use Glib::Object::Introspection;
  0            
  0            
29              
30             # ABSTRACT: Bindings for GStreamer 1.0, the open source multimedia framework
31              
32             BEGIN {
33             foreach my $name ('', (
34             #'Allocators',
35             'App',
36             #'Audio',
37             'Base',
38             #'Check',
39             'Controller',
40             #'Fft',
41             #'InsertBin',
42             #'Mpegts',
43             #'Net',
44             #'Pbutils',
45             #'Riff',
46             #'Rtp',
47             #'Rtsp',
48             #'Sdp',
49             #'Tag',
50             #'Video',
51             )) {
52             my $basename = 'Gst' . $name;
53             my $pkg = $name
54             ? 'GStreamer1::' . $name
55             : 'GStreamer1';
56             Glib::Object::Introspection->setup(
57             basename => $basename,
58             version => '1.0',
59             package => $pkg,
60             );
61             }
62             }
63              
64             use GStreamer1::Caps::Simple;
65              
66             1;
67             __END__