22 static const cob_field_attr a_9 = {0x24, 6, 0, 0x0000,
"Z\005\000\000\0009\001\000\000\000B\002\000\000\000"};
89 static const cob_field c_60 = {78, (
cob_u8_ptr)
"2: -R Do NOT print out source code prior to xref listings in cobc free form", &a_4};
123 static const char st_1[] =
"cobxref.cbl";
124 static const char st_2[] =
"aa000-xref-Data";
125 static const char st_3[] =
"PERFORM";
126 static const char st_4[] =
"MOVE";
127 static const char st_5[] =
"CALL";
128 static const char st_6[] =
"IF";
129 static const char st_7[] =
"DISPLAY";
130 static const char st_8[] =
"SORT";
131 static const char st_9[] =
"GOBACK";
133 static const char st_11[] =
"aa020-Bypass-Open";
134 static const char st_12[] =
"INITIALIZE";
135 static const char st_13[] =
"WRITE";
136 static const char st_14[] =
"aa030-ReadLoop1";
137 static const char st_15[] =
"CLOSE";
138 static const char st_16[] =
"GO TO";
139 static const char st_17[] =
"UNSTRING";
140 static const char st_18[] =
"aa040-ReadLoop2";
141 static const char st_19[] =
"aa041-Get-SN";
142 static const char st_20[] =
"aa042-Getword";
143 static const char st_21[] =
"aa044-Getword3";
145 static const char st_23[] =
"aa045-Test-Section";
146 static const char st_24[] =
"EXIT PERFORM";
147 static const char st_25[] =
"aa045-Exit";
149 static const char st_27[] =
"aa046-Get-Currency";
150 static const char st_28[] =
"aa047-GetIO";
151 static const char st_29[] =
"aa047-Getword";
152 static const char st_30[] =
"aa047-Getword2";
153 static const char st_31[] =
"aa047-Getword3";
154 static const char st_32[] =
"aa048-GetIOC";
155 static const char st_33[] =
"aa048-Get-Next";
156 static const char st_34[] =
"aa049-Getword";
157 static const char st_35[] =
"aa050-ReadLoop3";
158 static const char st_36[] =
"aa060-ReadLoop3a";
159 static const char st_37[] =
"ba000-Process-WS";
160 static const char st_38[] =
"ba020-GetAWord";
161 static const char st_39[] =
"ba040-Clear-To-Next-Period";
162 static const char st_40[] =
"INSPECT";
163 static const char st_41[] =
"ba049-Exit";
164 static const char st_42[] =
"ba050-Get-User-Word";
165 static const char st_43[] =
"ba050-Bypass-Add-2-Con-Table";
166 static const char st_44[] =
"ba051-After-DataName";
167 static const char st_45[] =
"ba051-After-New-Word";
168 static const char st_46[] =
"ba052-After-Index";
169 static const char st_47[] =
"ba053-After-Depending";
170 static const char st_48[] =
"ba000-Exit";
171 static const char st_49[] =
"bb000-Process-Procedure";
172 static const char st_50[] =
"bb010-New-Record";
173 static const char st_51[] =
"bb020-GetAWord";
174 static const char st_52[] =
"bb030-Chk1";
175 static const char st_53[] =
"bb040-chk2";
176 static const char st_54[] =
"STRING";
177 static const char st_55[] =
"SUBTRACT";
178 static const char st_56[] =
"bb050-Check-SubScripts";
179 static const char st_57[] =
"bb051-Clear-Left-Brace";
180 static const char st_58[] =
"bb052-Clear-Right-Brace";
181 static const char st_59[] =
"bb053-numerics";
182 static const char st_60[] =
"bb054-spaces";
183 static const char st_61[] =
"bb060-Scan4-Quotes";
184 static const char st_62[] =
"bb070-Got-Quote";
185 static const char st_63[] =
"bb080-Quote-Clean";
186 static const char st_64[] =
"bb090-Recover-Word";
187 static const char st_65[] =
"bb100-scan4-colon";
188 static const char st_66[] =
"bb000-Exit";
189 static const char st_67[] =
"bc000-Last-Act";
190 static const char st_68[] =
"bc010-group-report";
192 static const char st_70[] =
"bc020-Read-Sorter";
193 static const char st_71[] =
"bc030-IsX";
194 static const char st_72[] =
"bc040-PrintXRef";
195 static const char st_73[] =
"bc050-Check-Q";
196 static const char st_74[] =
"bc060-ConnectC";
197 static const char st_75[] =
"bc070-ConnectD";
198 static const char st_76[] =
"bc080-Exit";
199 static const char st_77[] =
"bc090-Last-Pass2";
200 static const char st_78[] =
"bc100-Working-Storage-Report";
201 static const char st_79[] =
"bc110-Read-Sorter";
202 static const char st_80[] =
"bc120-IsX2";
203 static const char st_81[] =
"bc130-PrintXRef2";
204 static const char st_82[] =
"bc140-Check-Q";
205 static const char st_83[] =
"bc150-ConnectC2";
206 static const char st_84[] =
"bc160-ConnectD2";
207 static const char st_85[] =
"bc170-Exit";
208 static const char st_86[] =
"bc180-Exit";
209 static const char st_87[] =
"bc190-Do-Conditions";
210 static const char st_88[] =
"bc192-Print-Conditions";
211 static const char st_89[] =
"bc194-Now-Reverse";
212 static const char st_90[] =
"bc195-Done";
213 static const char st_91[] =
"bc200-Last-Pass3";
214 static const char st_92[] =
"bc210-Read-Sorter3";
215 static const char st_93[] =
"bc220-IsX3";
216 static const char st_94[] =
"bc230-PrintXRef3";
217 static const char st_95[] =
"bc250-ConnectC3";
218 static const char st_96[] =
"bc260-ConnectD3";
219 static const char st_97[] =
"bc270-Exit";
220 static const char st_98[] =
"bc280-Check-Q";
221 static const char st_99[] =
"bc300-Last-Pass4";
222 static const char st_100[] =
"bc310-Read-Sorter4";
223 static const char st_101[] =
"bc320-IsX4";
224 static const char st_102[] =
"bc330-PrintXRef4";
225 static const char st_103[] =
"bc335-Check-Q";
226 static const char st_104[] =
"bc340-ConnectC4";
227 static const char st_105[] =
"bc350-ConnectD4";
228 static const char st_106[] =
"bc360-Exit";
229 static const char st_107[] =
"bc399-Exit";
230 static const char st_108[] =
"bc400-Last-Pass5";
231 static const char st_109[] =
"bc410-Read-Sorter5";
232 static const char st_110[] =
"bc420-IsX5";
233 static const char st_111[] =
"bc430-PrintXRef5";
234 static const char st_112[] =
"bc440-Check-4Old";
235 static const char st_113[] =
"bc450-Exit";
236 static const char st_114[] =
"bc500-Last-Pass6";
237 static const char st_115[] =
"bc510-Read-Sorter6";
238 static const char st_116[] =
"bc520-IsX6";
239 static const char st_117[] =
"bc530-PrintXRef6";
240 static const char st_118[] =
"bc540-Check-4Old";
241 static const char st_119[] =
"bc540-Check-4Old6";
242 static const char st_120[] =
"bc550-Exit";
243 static const char st_121[] =
"bc600-Print-Globals";
244 static const char st_122[] =
"bc600-Exit";
245 static const char st_123[] =
"bc620-Do-Global-Conditions";
246 static const char st_124[] =
"bc629-Exit";
247 static const char st_125[] =
"bc000-Exit";
248 static const char st_126[] =
"zz000-Routines";
249 static const char st_127[] =
"zz000-Inc-CobolRefNo";
250 static const char st_128[] =
"zz000-OutputSource";
251 static const char st_129[] =
"zz030-Write-Sort";
252 static const char st_130[] =
"zz100-Get-A-Source-Record";
253 static const char st_131[] =
"zz100-New-Program-point";
254 static const char st_132[] =
"zz100-Exit";
255 static const char st_133[] =
"zz110-Get-A-Word";
256 static const char st_134[] =
"zz110-Get-A-Word-Unstring";
257 static const char st_135[] =
"zz110-Get-A-Word-Literal";
258 static const char st_136[] =
"zz110-Get-A-Word-Literal2";
259 static const char st_137[] =
"zz110-Get-A-Word-OverFlow";
260 static const char st_138[] =
"zz110-Get-A-Word-Copy-Check";
261 static const char st_139[] =
"zz110-Exit";
262 static const char st_140[] =
"zz120-Replace-Multi-Spaces";
263 static const char st_141[] =
"zz120-Kill-Space";
264 static const char st_142[] =
"zz120-Kill-Space-Exit";
265 static const char st_143[] =
"zz120-Exit";
266 static const char st_144[] =
"zz130-Extra-Reserved-Word-Check";
267 static const char st_145[] =
"SEARCH ALL";
269 static const char st_147[] =
"zz130-Exit";
270 static const char st_148[] =
"zz140-Function-Check";
271 static const char st_149[] =
"zz140-Exit";
272 static const char st_150[] =
"zz150-WriteHdb";
274 static const char st_152[] =
"zz150-WriteHdb1";
275 static const char st_153[] =
"zz150-WriteHdb2";
276 static const char st_154[] =
"zz150-WriteHdb2b";
277 static const char st_155[] =
"zz150-WriteHdb3";
278 static const char st_156[] =
"zz150-WriteHdb4";
279 static const char st_157[] =
"zz150-WriteHdb5";
280 static const char st_158[] =
"zz150-WriteHdb6";
281 static const char st_159[] =
"zz150-WriteHdb7";
282 static const char st_160[] =
"zz150-WriteHdb8";
283 static const char st_161[] =
"zz150-Exit";
284 static const char st_162[] =
"zz160-Clean-Number";
286 static const char st_164[] =
"zz160-Exit";
287 static const char st_165[] =
"zz170-Check-4-Section";
288 static const char st_166[] =
"zz170-Exit";
289 static const char st_167[] =
"zz180-Open-Source-File";
290 static const char st_168[] =
"zz180-Check-For-Param-Errors";
291 static const char st_169[] =
"zz180-Get-Program-Args";
292 static const char st_170[] =
"zz182-Get-Env-Set-TempFiles";
293 static const char st_171[] =
"zz182-Exit";
294 static const char st_172[] =
"zz180-Exit";
295 static const char st_173[] =
"zz190-Init-Program";
296 static const char st_174[] =
"zz190-Exit";
297 static const char st_175[] =
"zz200-Load-Git";
298 static const char st_176[] =
"zz200-Exit";
299 static const char st_177[] =
"zz310-Check-For-Globals";
300 static const char st_178[] =
"zz319-Exit";
305 const unsigned char *p;
308 p = (
const unsigned char *)data;
310 for (n = 0; n < size; ++n, ++p) {
312 retval += (*p & 0x0F);
320 return (*(
const signed char *)p < n) ? -1 : (*(
const signed char *)p > n);
328 return (val < n) ? -1 : (val > n);
static const cob_field_attr a_2
static const char st_83[]
static const char st_109[]
static const cob_field c_74
static const char st_15[]
static const cob_field c_68
static cob_field cob_all_zero
static const char st_32[]
static const char st_153[]
static const cob_field c_79
static const char st_113[]
static const char st_65[]
static const char st_136[]
static const char st_78[]
static const char st_60[]
static const char st_27[]
static const cob_field c_42
static const cob_field_attr a_7
static const char st_75[]
static const cob_field_attr a_9
static const cob_field c_67
static const char st_172[]
static const char st_127[]
static const char st_139[]
static const char st_133[]
static const cob_field_attr a_11
static const char st_64[]
static const cob_field_attr a_3
static const char st_36[]
static const char st_61[]
static const char st_91[]
static const char st_55[]
static const cob_field c_54
static const cob_field c_14
static const cob_field c_85
static const char st_134[]
static const char st_143[]
static const cob_field c_62
static const char st_58[]
static const char st_156[]
static const cob_field c_33
static const char st_80[]
static const cob_field c_20
static const char st_53[]
static const char st_176[]
static const char st_69[]
static const char st_70[]
static const char st_171[]
static const char st_135[]
static const cob_field c_51
static const char st_160[]
static const cob_field c_80
static const cob_field c_46
static const char st_50[]
static const cob_field c_5
static const char st_110[]
static const char st_120[]
static const char st_63[]
static COB_INLINE COB_A_INLINE int cob_cmp_s8(const void *p, const cob_s64_t n)
static const cob_field c_21
static const cob_field c_28
static const cob_field c_17
static const char st_43[]
static const cob_field c_57
static const cob_field_attr a_4
static const char st_145[]
static const char st_150[]
static const char st_86[]
static const cob_field c_16
static const char st_111[]
static const char st_26[]
static const cob_field c_64
static const cob_field c_36
static const char st_72[]
static const cob_field c_58
static const char st_20[]
static const char st_103[]
static const char st_42[]
static const char st_28[]
static const char st_98[]
static const char st_38[]
static const cob_field c_30
static const cob_field c_25
static const char st_40[]
static const char st_16[]
static const cob_field c_61
static const char st_67[]
static const char st_89[]
static const cob_field c_6
static const char st_125[]
static const char st_29[]
static const char st_163[]
static const char st_77[]
static const char st_157[]
#define COB_BSWAP_32(val)
static COB_INLINE COB_A_INLINE void cob_setswp_s32(void *p, const int val)
static const cob_field c_82
static const char st_11[]
static const cob_field c_48
static const cob_field c_86
static const char st_178[]
static const char st_12[]
static const char st_41[]
static const cob_field c_44
static const char st_124[]
static const char st_10[]
static const cob_field c_9
static const cob_field c_29
static const char st_79[]
static const char st_112[]
static const cob_field c_77
static const cob_field c_35
static const char st_141[]
static const char st_105[]
static COB_INLINE COB_A_INLINE int cob_cmp_s32(const void *p, const cob_s64_t n)
static cob_field cob_all_space
static const char st_104[]
static const char st_96[]
static const char st_92[]
static const char st_84[]
static const cob_field c_40
static const char st_154[]
static const char st_39[]
static const cob_field c_27
static const char st_66[]
static const char st_140[]
static const char st_95[]
static const char st_162[]
static const char st_17[]
static const cob_field c_47
static const char st_99[]
static const char st_18[]
static const cob_field c_24
static const cob_field_attr a_6
static const char st_35[]
static const char st_57[]
static const char st_101[]
static const cob_field c_39
static const cob_field c_55
static const char st_147[]
static const cob_field c_75
EC ARGUMENT EC EC BOUND EC BOUND EC BOUND EC BOUND TABLE EC DATA EC DATA EC DATA PTR NULL
static const char st_33[]
static const char st_24[]
static const cob_field c_65
static const cob_field_attr a_1
static const cob_field c_50
static const char st_56[]
static const char st_97[]
static const char st_148[]
static const char st_174[]
static const char st_121[]
static const cob_field c_26
static const cob_field c_15
static const char st_126[]
static const char st_169[]
static const cob_field c_84
static const cob_field c_2
static const char st_106[]
static const char st_48[]
static const char st_90[]
static const char st_45[]
static const char st_37[]
static const cob_field c_43
static const char st_44[]
static const char st_161[]
static const cob_field c_81
static const cob_field c_71
static const cob_field c_63
static const cob_field_attr a_5
static const char st_19[]
static const cob_field c_76
static const char st_117[]
static const char st_23[]
static const char st_170[]
static const char st_76[]
static const char st_54[]
static const char st_102[]
static const char st_51[]
static const cob_field c_31
static const cob_field c_70
static const char st_167[]
static const char st_73[]
static const cob_field c_1
static const char st_119[]
static const char st_93[]
static const char st_13[]
static const cob_field c_72
static const char st_144[]
static const char * cob_module_path
static const char st_138[]
static const char st_137[]
static const char st_155[]
static const cob_field c_13
static const char st_82[]
static const cob_field c_78
static const char st_22[]
static int COB_NOINLINE cob_get_numdisp(const void *data, const size_t size)
static const cob_field c_52
static const char st_71[]
static const cob_field c_49
static const char st_166[]
static const char st_81[]
static const cob_field c_69
static const cob_field_attr a_10
static const char st_116[]
static cob_field cob_all_quote
static const char st_142[]
static const char st_25[]
static const char st_122[]
static const char st_52[]
static const cob_field c_3
static const cob_field c_45
static const cob_field c_11
static const char st_159[]
static const char st_146[]
static const char st_100[]
static const char st_168[]
static const cob_field c_10
static const char st_21[]
static const cob_field c_59
static const cob_field c_38
static const cob_field_attr cob_all_attr
static const cob_field c_23
static const char st_114[]
static const cob_field c_7
static const char st_129[]
static const cob_field c_41
static const char st_88[]
static const cob_field c_4
static const char st_31[]
static const char st_107[]
static const char st_30[]
static const char st_49[]
static const cob_field_attr a_8
static const char st_46[]
static const cob_field c_19
static const char st_177[]
static const cob_field c_22
static const char st_128[]
static const cob_field c_83
static const cob_field c_53
static const char st_118[]
static const char st_131[]
static const cob_field c_12
static const char st_85[]
static const cob_field c_34
static const cob_field c_37
static const char st_165[]
static const char st_164[]
static const char st_149[]
static const cob_field c_32
static const cob_field c_56
static const cob_field c_8
static const char st_59[]
static const char st_62[]
static const char st_151[]
static const cob_field c_18
static const char st_14[]
static const char st_87[]
static const char st_34[]
static const char st_123[]
static const cob_field c_66
static const char st_74[]
static const char st_173[]
static const char st_94[]
static const cob_field c_73
static const char st_175[]
static const char st_158[]
static const char st_47[]
static const char st_68[]
static const cob_field c_60
static const char st_130[]
static const char st_108[]
static const char st_152[]
static const char st_132[]
static const char st_115[]