Source file conan_apache.ml
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
let tree = Conan.Tree.Unsafe.node
[(Conan.Tree.Unsafe.elt ?filename:(Some "apache")
?line:(Some 23)
(let ty = Conan.Ty.search ~compact_whitespaces:false
~optional_blank:false
~lower_case_insensitive:false
~upper_case_insensitive:false `Text ~trim:false
3L ~pattern:"SEQ" in
Conan.Tree.Unsafe.rule
~offset:(Conan.Offset.Absolute (Conan.Offset.Value 0L))
ty (Conan.Test.string (Conan.Comparison.equal_to "SEQ"))
(`Space "")),
Conan.Tree.Unsafe.node
[(Conan.Tree.Unsafe.elt ?filename:(Some "apache")
?line:(Some 26)
(let ty = Conan.Ty.numeric ~unsigned:false
Conan.Integer.byte
(Conan.Arithmetic.Add '\000') in
Conan.Tree.Unsafe.rule
~offset:(Conan.Offset.Absolute
(Conan.Offset.Value 3L))
ty
(Conan.Test.numeric Conan.Integer.byte
(Conan.Comparison.equal_to '\006'))
(`Space "")),
Conan.Tree.Unsafe.node
[(Conan.Tree.Unsafe.elt ?filename:(Some "apache")
?line:(Some 28)
(let ty = Conan.Ty.default in
Conan.Tree.Unsafe.rule
~offset:(Conan.Offset.Absolute
(Conan.Offset.Value 3L))
ty (Conan.Test.always_true)
(`Space "Apache Hadoop Sequence file version 6")),
Conan.Tree.Unsafe.leaf);
(Conan.Tree.Unsafe.elt ?filename:(Some "apache")
?line:(Some 27)
(let ty = Conan.Ty.search ~compact_whitespaces:false
~optional_blank:false
~lower_case_insensitive:false
~upper_case_insensitive:false `Text
~trim:false 45L
~pattern:"org.apache.hadoop.hive.ql.io.RCFile$KeyBuffer" in
Conan.Tree.Unsafe.rule
~offset:(Conan.Offset.Absolute
(Conan.Offset.Value 5L))
ty
(Conan.Test.string
(Conan.Comparison.equal_to
"org.apache.hadoop.hive.ql.io.RCFile$KeyBuffer"))
(`Space "Apache Hive RC file version 0")),
Conan.Tree.Unsafe.leaf)]);
(Conan.Tree.Unsafe.elt ?filename:(Some "apache")
?line:(Some 25)
(let ty = Conan.Ty.numeric ~unsigned:false
Conan.Integer.byte
(Conan.Arithmetic.Add '\000') in
Conan.Tree.Unsafe.rule
~offset:(Conan.Offset.Absolute
(Conan.Offset.Value 3L))
ty
(Conan.Test.numeric Conan.Integer.byte
(Conan.Comparison.greater_than '\006'))
(`Space "Apache Hadoop Sequence file version %d")),
Conan.Tree.Unsafe.leaf);
(Conan.Tree.Unsafe.elt ?filename:(Some "apache")
?line:(Some 24)
(let ty = Conan.Ty.numeric ~unsigned:false
Conan.Integer.byte
(Conan.Arithmetic.Add '\000') in
Conan.Tree.Unsafe.rule
~offset:(Conan.Offset.Absolute
(Conan.Offset.Value 3L))
ty
(Conan.Test.numeric Conan.Integer.byte
(Conan.Comparison.lower_than '\006'))
(`Space "Apache Hadoop Sequence file version %d")),
Conan.Tree.Unsafe.leaf)]);
(Conan.Tree.Unsafe.elt ?filename:(Some "apache")
?line:(Some 18)
(let ty = Conan.Ty.search ~compact_whitespaces:false
~optional_blank:false
~lower_case_insensitive:false
~upper_case_insensitive:false `Text ~trim:false
3L ~pattern:"RCF" in
Conan.Tree.Unsafe.rule
~offset:(Conan.Offset.Absolute (Conan.Offset.Value 0L))
ty (Conan.Test.string (Conan.Comparison.equal_to "RCF"))
(`Space "Apache Hive RC file")),
Conan.Tree.Unsafe.node
[(Conan.Tree.Unsafe.elt ?filename:(Some "apache")
?line:(Some 19)
(let ty = Conan.Ty.numeric ~unsigned:false
Conan.Integer.byte
(Conan.Arithmetic.Add '\000') in
Conan.Tree.Unsafe.rule
~offset:(Conan.Offset.Absolute
(Conan.Offset.Value 3L))
ty (Conan.Test.always_true) (`Space "version %d")),
Conan.Tree.Unsafe.leaf)]);
(Conan.Tree.Unsafe.elt ?filename:(Some "apache")
?line:(Some 15)
(let ty = Conan.Ty.search ~compact_whitespaces:false
~optional_blank:false
~lower_case_insensitive:false
~upper_case_insensitive:false `Text ~trim:false
4L ~pattern:"PAR1" in
Conan.Tree.Unsafe.rule
~offset:(Conan.Offset.Absolute (Conan.Offset.Value 0L))
ty (Conan.Test.string (Conan.Comparison.equal_to "PAR1"))
(`Space "Apache Parquet")),
Conan.Tree.Unsafe.leaf);
(Conan.Tree.Unsafe.elt ?filename:(Some "apache")
?line:(Some 12)
(let ty = Conan.Ty.search ~compact_whitespaces:false
~optional_blank:false
~lower_case_insensitive:false
~upper_case_insensitive:false `Text ~trim:false
3L ~pattern:"ORC" in
Conan.Tree.Unsafe.rule
~offset:(Conan.Offset.Absolute (Conan.Offset.Value 0L))
ty (Conan.Test.string (Conan.Comparison.equal_to "ORC"))
(`Space "Apache ORC")),
Conan.Tree.Unsafe.leaf);
(Conan.Tree.Unsafe.elt ?filename:(Some "apache") ?line:
(Some 7)
(let ty = Conan.Ty.search ~compact_whitespaces:false
~optional_blank:false
~lower_case_insensitive:false
~upper_case_insensitive:false `Text ~trim:false
3L ~pattern:"Obj" in
Conan.Tree.Unsafe.rule
~offset:(Conan.Offset.Absolute (Conan.Offset.Value 0L))
ty (Conan.Test.string (Conan.Comparison.equal_to "Obj"))
(`Space "Apache Avro")),
Conan.Tree.Unsafe.node
[(Conan.Tree.Unsafe.elt ?filename:(Some "apache")
?line:(Some 8)
(let ty = Conan.Ty.numeric ~unsigned:false
Conan.Integer.byte
(Conan.Arithmetic.Add '\000') in
Conan.Tree.Unsafe.rule
~offset:(Conan.Offset.Absolute
(Conan.Offset.Value 3L))
ty (Conan.Test.always_true) (`Space "version %d")),
Conan.Tree.Unsafe.leaf)])]