File Coverage

blib/lib/Quilt/Objs.pm
Criterion Covered Total %
statement 1 3 33.3
branch n/a
condition n/a
subroutine 1 1 100.0
pod n/a
total 2 4 50.0


line stmt bran cond sub pod time code
1             package Quilt::Objs;
2              
3 1     1   1478 use Class::Visitor;
  0            
  0            
4              
5             use strict;
6              
7             visitor_class 'Quilt', 'Class::Visitor::Base', {};
8              
9             visitor_class 'Quilt::Flow', 'Quilt', {
10             contents => '@',
11             id => '$',
12             generated_id => '$',
13             inline => '$',
14             is_mark => '$', # XXX hack, hack, hack
15             lines => '$',
16             quadding => '$',
17             first_line_start_indent => '$',
18             start_indent => '$',
19             end_indent => '$',
20             space_before => '$',
21             space_after => '$',
22             };
23              
24             visitor_class 'Quilt::DO::Document', 'Quilt', {
25             contents => '@',
26             id => '$',
27             generated_id => '$',
28             title => '@',
29             subtitle => '@',
30             authors => '@',
31             abstract => '@',
32             date => '@',
33             };
34              
35             visitor_class 'Quilt::DO::Struct::Section', 'Quilt::Flow', {
36             title => '@',
37             subtitle => '@',
38             type => '$',
39             };
40              
41             visitor_class 'Quilt::DO::Struct::Formal', 'Quilt::Flow', {
42             title => '@',
43             subtitle => '@',
44             type => '$',
45             };
46              
47             visitor_class 'Quilt::DO::Struct::Admonition', 'Quilt::DO::Struct::Formal', {};
48             visitor_class 'Quilt::DO::Struct::Bridge', 'Quilt::Flow', {};
49              
50             visitor_class 'Quilt::DO::List', 'Quilt::Flow', {
51             type => '$',
52             continued => '$',
53             };
54              
55             # lines: wrap*, asis
56             # quadding: start*, end, center, justify
57             # first-line-start-indent: (0pt*)
58             # start-indent: (0pt*)
59             # end-indent: (0pt*)
60             # space-before: (0pt*)
61             # space-after: (0pt*)
62             visitor_class 'Quilt::Flow::Paragraph', 'Quilt::Flow', {
63             };
64              
65             visitor_class 'Quilt::DO::Block::Paragraph', 'Quilt::Flow', {};
66             visitor_class 'Quilt::DO::List::Item', 'Quilt::Flow', {};
67             visitor_class 'Quilt::DO::List::Term', 'Quilt::Flow', {};
68              
69             visitor_class 'Quilt::DO::Author', 'Quilt', {
70             contents => '@',
71             id => '$',
72             generated_id => '$',
73             formatted_name => '@',
74             family_name => '@',
75             given_name => '@',
76             other_name => '@',
77             title => '@',
78             org_unit => '@',
79             org_name => '@',
80             org_name_abbr => '@',
81             postoffice_address => '@',
82             street => '@',
83             locality => '@',
84             region => '@',
85             postal_code => '@',
86             country => '@',
87             email => '@',
88             url => '@',
89             blurb => '@',
90             };
91              
92             visitor_class 'Quilt::DO::Inline', 'Quilt::Flow', {};
93             visitor_class 'Quilt::DO::Inline::Quote', 'Quilt::DO::Inline', {};
94             visitor_class 'Quilt::DO::Inline::Emphasis', 'Quilt::DO::Inline', {};
95             visitor_class 'Quilt::DO::Inline::Literal', 'Quilt::DO::Inline', {};
96             visitor_class 'Quilt::DO::Inline::Replaceable', 'Quilt::DO::Inline', {};
97             visitor_class 'Quilt::DO::Inline::Package', 'Quilt::DO::Inline', {};
98             visitor_class 'Quilt::DO::Inline::Index', 'Quilt::DO::Inline', {};
99              
100             visitor_class 'Quilt::DO::Block', 'Quilt::Flow', {};
101             visitor_class 'Quilt::DO::Block::Screen', 'Quilt::DO::Block', {};
102             visitor_class 'Quilt::DO::Block::Quote', 'Quilt::DO::Block', {};
103             visitor_class 'Quilt::DO::Block::NoFill', 'Quilt::DO::Block', {};
104             visitor_class 'Quilt::DO::Block::Line', 'Quilt::DO::Block', {};
105              
106             visitor_class 'Quilt::DO::XRef', 'Quilt', {};
107             visitor_class 'Quilt::DO::XRef::URL', 'Quilt::Flow', {
108             url => '$',
109             };
110             visitor_class 'Quilt::DO::XRef::End', 'Quilt::Flow', {
111             link => '$',
112             };
113             visitor_class 'Quilt::DO::XRef::Anchor', 'Quilt', {
114             id => '$',
115             generated_id => '$',
116             };
117              
118             visitor_class 'Quilt::Flow::DisplaySpace', 'Quilt', {
119             space => '$',
120             priority => '$',
121             };
122              
123             visitor_class 'Quilt::Flow::Table', 'Quilt', {
124             contents => '@',
125             id => '$',
126             generated_id => '$',
127             frame => '$',
128             colsep => '$',
129             rowsep => '$',
130             page_wide => '$',
131             };
132              
133             visitor_class 'Quilt::Flow::Table::Part', 'Quilt', {
134             contents => '@',
135             id => '$',
136             generated_id => '$',
137             type => '$',
138             };
139             visitor_class 'Quilt::Flow::Table::Row', 'Quilt', {
140             contents => '@',
141             id => '$',
142             generated_id => '$',
143             };
144             visitor_class 'Quilt::Flow::Table::Cell', 'Quilt', {
145             contents => '@',
146             id => '$',
147             generated_id => '$',
148             };
149              
150             package Quilt::Flow::Display;
151             package Quilt::Flow::Paragraph;
152             package Quilt::Flow::Inline;
153             package Quilt::HTML;
154             package Quilt::HTML::Title;
155             package Quilt::HTML::Pre;
156             package Quilt::HTML::List;
157             package Quilt::HTML::ListItem;
158              
159             1;