-
Notifications
You must be signed in to change notification settings - Fork 0
/
gregg_prefix.unit
450 lines (361 loc) · 106 KB
/
gregg_prefix.unit
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
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
#!/usr/local/bin/koios
# koios-polos (axis of heaven) unit testing meta-language
#23456789-12 123456789-123456789-123456789-12345 123456789-123456789-123456 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789- 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789-123456789-
#==(verb)=== ===========(description)=========== =====(function)=========== ========================(arguments)================================================================= ==(test)== ==========================(results)================================================================= ========(var)=======
PREP include the prototype headers - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
incl include public header gregg.h - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
#23456789-12 123456789-123456789-123456789-12345 123456789-123456789-123456 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789- 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789-123456789-
#==(verb)=== ===========(description)=========== =====(function)=========== ========================(arguments)================================================================= ==(test)== ==========================(results)================================================================= ========(var)=======
SCRP (PREFIX) verify details of prefix handler 0s handler PREFIX__handler, PREFIX__purge ((01.---)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND initialize the testing environment - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.001)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec start testing PROG__unit_quiet i_equal 0
exec open using stdin yPARSE_stdin i_equal 0
local create working variable - - - - - - - - - - - - - int c = 0;
COND verify simple success - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
load add a line to stdin stdin re § 5 m 15 § re § · § r·<· §¦
exec read the record yPARSE_read &c, NULL, NULL, NULL i_greater 0
exec call handler PREFIX__handler 2 , "re" , '-' , NULL i_equal 0
exec ... check count PREFIX__count i_equal 1
get ... check line PREFIX__detail 0 s_equal 0 2 2åreæ 5 m 15 2åreæ 4år·<·æ ·
get ... check line PREFIX__detail 1 s_equal n/a
get ... check line PREFIX__detail 2 s_equal n/a
COND verify adding a second entry - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.003)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
load add a line to stdin stdin con § 9 u 82 § con § · § k·<· §¦
exec read the record yPARSE_read &c, NULL, NULL, NULL i_greater 0
exec call handler PREFIX__handler 3 , "con" , '-' , NULL i_equal 0
exec ... check count PREFIX__count i_equal 2
get ... check line PREFIX__detail 0 s_equal 0 2 2åreæ 5 m 15 2åreæ 4år·<·æ ·
get ... check line PREFIX__detail 1 s_equal 1 3 3åconæ 9 u 82 3åconæ 4åk·<·æ ·
get ... check line PREFIX__detail 2 s_equal n/a
COND verify purging entries - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.004)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call purge PREFIX__purge i_equal 0
exec ... check count PREFIX__count i_equal 0
get ... check line PREFIX__detail 0 s_equal n/a
get ... check line PREFIX__detail 1 s_equal n/a
get ... check line PREFIX__detail 2 s_equal n/a
COND complete testing - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.005)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec stop testing PROG__unit_end i_equal 0
#23456789-12 123456789-123456789-123456789-12345 123456789-123456789-123456 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789- 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789-123456789-
#==(verb)=== ===========(description)=========== =====(function)=========== ========================(arguments)================================================================= ==(test)== ==========================(results)================================================================= ========(var)=======
SCRP (PREFIX) verify reading prefixes from file 0s file PREFIX_load ((02.---)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND initialize the testing environment - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.001)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec start testing PROG__unit_quiet i_equal 0
local create working/return variable - - - - - - - - - - - - - char *x_name = "/tmp/prefix.txt";
COND create a simple input file - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec create empty file yURG_touch x_name , "root" , "root" , "0600" i_equal 0
file read for writing - - - - - - - - - - - - - [[ x_name ]]
append ... add a record - - - - - - - - - - - - - # natsvi configuration file
append ... add a record - - - - - - - - - - - - -
append ... add a record - - - - - - - - - - - - - #23456789-123456789- § 123456789-123456789- §
append ... add a record - - - - - - - - - - - - - re § 5 m 15 § re § r·<· § r·<· § testing §
append ... add a record - - - - - - - - - - - - - con § 9 u 82 § kon § k·n·<· § k·<· § other text § more so §
append ... add a record - - - - - - - - - - - - -
append ... add a record - - - - - - - - - - - - - self § · ! · § self § · § z·s·<· §
append ... add a record - - - - - - - - - - - - - # end-of-file
exec verify file size yURG_peek_count x_name i_equal 8
COND verify reading the file - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.003)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call loader PREFIX_load x_name i_equal 0
exec ... check count PREFIX__count i_equal 3
get ... check line PREFIX__detail 0 s_equal 0 4 2åreæ 5 m 15 2åreæ 4år·<·æ ·
get ... check line PREFIX__detail 1 s_equal 1 5 3åconæ 9 u 82 3åkonæ 4åk·<·æ ·
get ... check line PREFIX__detail 2 s_equal 2 7 4åselfæ · ! · 4åselfæ 6åz·s·<·æ ·
get ... check line PREFIX__detail 3 s_equal n/a
COND complete testing - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.004)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec remove test file yURG_rm x_name i_equal 0
exec stop testing PROG__unit_end i_equal 0
#23456789-12 123456789-123456789-123456789-12345 123456789-123456789-123456 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789- 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789-123456789-
#==(verb)=== ===========(description)=========== =====(function)=========== ========================(arguments)================================================================= ==(test)== ==========================(results)================================================================= ========(var)=======
SCRP (PREFIX) verify updates to prefixes and bases 0s english PREFIX_english_change, PREFIX_english_final ((02.---)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND initialize the testing environment - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.001)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec start testing PROG__unit_quiet i_equal 0
local create working/return variable - - - - - - - - - - - - - char x_update [LEN_TITLE] = "";
local create working/return variable - - - - - - - - - - - - - char x_prefix [LEN_LABEL] = "";
local create working/return variable - - - - - - - - - - - - - char x_trunc = 0;
local create working/return variable - - - - - - - - - - - - - void *x_point = NULL;
REUSE -C- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
REUSE -D- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND verify quick success - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call update PREFIX_english_change "tact" , "con" , x_update , x_prefix , &x_trunc i_equal 0
echo ... check updated english - - - - - - - - - - - - - x_update w_equal åtactæ
echo ... check updated prefix - - - - - - - - - - - - - x_prefix w_equal åconæ
echo ... check prefix truncation - - - - - - - - - - - - - x_trunc i_equal 0
COND attempt with null root - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call update PREFIX_english_change NULL , "con" , x_update , x_prefix , &x_trunc i_lesser 0
echo ... check updated english - - - - - - - - - - - - - x_update w_equal åæ
echo ... check updated prefix - - - - - - - - - - - - - x_prefix w_equal åæ
echo ... check prefix truncation - - - - - - - - - - - - - x_trunc i_equal 0
COND verify with optional update null - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call update PREFIX_english_change "tact" , "con" , NULL , x_prefix , &x_trunc i_equal 0
echo ... check updated prefix - - - - - - - - - - - - - x_prefix w_equal åconæ
echo ... check prefix truncation - - - - - - - - - - - - - x_trunc i_equal 0
COND verify change to prefix - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call update PREFIX_english_change "sphere" , "peri×" , x_update , x_prefix , &x_trunc i_equal 0
echo ... check updated english - - - - - - - - - - - - - x_update w_equal åsphereæ
echo ... check updated prefix - - - - - - - - - - - - - x_prefix w_equal åperiæ
echo ... check prefix truncation - - - - - - - - - - - - - x_trunc i_equal 1
exec call find PREFIX__by_name x_prefix , NULL , NULL , &x_point i_greater 0
exec call final PREFIX_english_final x_point , "spherical" , x_update i_equal 0
echo ... check updated english - - - - - - - - - - - - - x_update w_equal åpersphericalæ
COND attempt with null change - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call update PREFIX_english_change "tact" , NULL , x_update , x_prefix , &x_trunc i_lesser 0
echo ... check updated english - - - - - - - - - - - - - x_update w_equal åæ
echo ... check updated prefix - - - - - - - - - - - - - x_prefix w_equal åæ
echo ... check prefix truncation - - - - - - - - - - - - - x_trunc i_equal 0
COND verify with optional prefix null - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call update PREFIX_english_change "tact" , "con" , x_update , NULL , &x_trunc i_equal 0
echo ... check updated english - - - - - - - - - - - - - x_update w_equal åtactæ
echo ... check prefix truncation - - - - - - - - - - - - - x_trunc i_equal 0
COND verify change to root - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call update PREFIX_english_change "sphere" , "periÖ" , x_update , x_prefix , &x_trunc i_equal 0
echo ... check updated english - - - - - - - - - - - - - x_update w_equal åphereæ
echo ... check updated prefix - - - - - - - - - - - - - x_prefix w_equal åperiæ
echo ... check prefix truncation - - - - - - - - - - - - - x_trunc i_equal 0
exec call find PREFIX__by_name x_prefix , NULL , NULL , &x_point i_greater 0
exec call final PREFIX_english_final x_point , "spherical" , x_update i_equal 0
echo ... check updated english - - - - - - - - - - - - - x_update w_equal åperiphericalæ
COND verify with optional trunc null - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call update PREFIX_english_change "tact" , "con" , x_update , x_prefix , NULL i_equal 0
echo ... check updated english - - - - - - - - - - - - - x_update w_equal åtactæ
echo ... check updated prefix - - - - - - - - - - - - - x_prefix w_equal åconæ
COND verify double change to root - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call update PREFIX_english_change "sphere" , "periÖÖ" , x_update , x_prefix , &x_trunc i_equal 0
echo ... check updated english - - - - - - - - - - - - - x_update w_equal åhereæ
echo ... check updated prefix - - - - - - - - - - - - - x_prefix w_equal åperiæ
echo ... check prefix truncation - - - - - - - - - - - - - x_trunc i_equal 0
COND verify one of each change - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call update PREFIX_english_change "sphere" , "peri×Ö" , x_update , x_prefix , &x_trunc i_equal 0
echo ... check updated english - - - - - - - - - - - - - x_update w_equal åphereæ
echo ... check updated prefix - - - - - - - - - - - - - x_prefix w_equal åperiæ
echo ... check prefix truncation - - - - - - - - - - - - - x_trunc i_equal 1
COND verify a root addition - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call update PREFIX_english_change "cession" , "aS" , x_update , x_prefix , &x_trunc i_equal 0
echo ... check updated english - - - - - - - - - - - - - x_update w_equal åscessionæ
echo ... check updated prefix - - - - - - - - - - - - - x_prefix w_equal åaæ
echo ... check prefix truncation - - - - - - - - - - - - - x_trunc i_equal 0
exec call find PREFIX__by_name x_prefix , NULL , NULL , &x_point i_greater 0
exec call final PREFIX_english_final x_point , "cessional" , x_update i_equal 0
echo ... check updated english - - - - - - - - - - - - - x_update w_equal åascessionalæ
COND complete testing - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.004)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec stop testing PROG__unit_end i_equal 0
#23456789-12 123456789-123456789-123456789-12345 123456789-123456789-123456 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789- 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789-123456789-
#==(verb)=== ===========(description)=========== =====(function)=========== ========================(arguments)================================================================= ==(test)== ==========================(results)================================================================= ========(var)=======
SCRP (PREFIX) verify finding prefixes 0s finding PREFIX__by_name, PREFIX_english ((02.---)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND initialize the testing environment - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.001)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec start testing PROG__unit_quiet i_equal 0
local create working/return variable - - - - - - - - - - - - - short n = 0;
local create working/return variable - - - - - - - - - - - - - char x_english [LEN_LABEL] = "";
local create working/return variable - - - - - - - - - - - - - char x_gregg [LEN_LABEL] = "";
local create working/return variable - - - - - - - - - - - - - void *x_point = NULL;
local create working/return variable - - - - - - - - - - - - - char x_again [LEN_LABEL] = "";
REUSE -C- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
REUSE -D- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND verify quick success on first item - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call find PREFIX__by_name "trans" , x_english , x_gregg , &x_point i_equal 1 n
echo ... check index - - - - - - - - - - - - - n i_equal 1
echo ... check english - - - - - - - - - - - - - x_english w_equal åtransæ
echo ... check gregg - - - - - - - - - - - - - x_gregg w_equal åt·<·æ
echo ... check point - - - - - - - - - - - - - x_point p_exists 0
get ... check line PREFIX__detail n s_equal 1 6 5åtransæ 5 m 103 5åtransæ 4åt·<·æ ·
get ... check line PREFIX__detail_by_ptr n , x_point s_equal 1 6 5åtransæ 5 m 103 5åtransæ 4åt·<·æ ·
exec call get english PREFIX_english x_point , x_again i_equal 0
echo ... check again - - - - - - - - - - - - - x_again w_equal åtransæ
COND verify on a later prefix - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call find PREFIX__by_name "de" , x_english , x_gregg , &x_point i_equal 3 n
echo ... check index - - - - - - - - - - - - - n i_equal 3
echo ... check english - - - - - - - - - - - - - x_english w_equal ådeæ
echo ... check gregg - - - - - - - - - - - - - x_gregg w_equal åd·<·æ
echo ... check point - - - - - - - - - - - - - x_point p_exists 0
get ... check line PREFIX__detail n s_equal 3 11 2ådeæ 5 m 81 2ådeæ 4åd·<·æ ·
get ... check line PREFIX__detail_by_ptr n , x_point s_equal 3 11 2ådeæ 5 m 81 2ådeæ 4åd·<·æ ·
exec call get english PREFIX_english x_point , x_again i_equal 0
echo ... check again - - - - - - - - - - - - - x_again w_equal ådeæ
COND attempt with missing prefix - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call find PREFIX__by_name "trouble" , x_english , x_gregg , &x_point i_lesser 0 n
echo ... check index - - - - - - - - - - - - - n i_lesser 0
echo ... check english - - - - - - - - - - - - - x_english w_equal åæ
echo ... check gregg - - - - - - - - - - - - - x_gregg w_equal åæ
echo ... check point - - - - - - - - - - - - - x_point p_null 0
get ... check line PREFIX__detail n s_equal n/a
get ... check line PREFIX__detail_by_ptr n , x_point s_equal n/a
exec call get english PREFIX_english x_point , x_again i_lesser 0
echo ... check again - - - - - - - - - - - - - x_again w_equal åæ
COND verify with missing english - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call find PREFIX__by_name "magni" , NULL , x_gregg , &x_point i_equal 37 n
echo ... check index - - - - - - - - - - - - - n i_equal 37
echo ... check gregg - - - - - - - - - - - - - x_gregg w_equal åm·<·æ
echo ... check point - - - - - - - - - - - - - x_point p_exists 0
get ... check line PREFIX__detail n s_equal 37 54 5åmagniæ 5 m 103 5åmagniæ 4åm·<·æ ·
get ... check line PREFIX__detail_by_ptr n , x_point s_equal 37 54 5åmagniæ 5 m 103 5åmagniæ 4åm·<·æ ·
exec call get english PREFIX_english x_point , x_again i_equal 0
echo ... check again - - - - - - - - - - - - - x_again w_equal åmagniæ
COND verify with missing gregg - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call find PREFIX__by_name "restr" , x_english , NULL , &x_point i_equal 41 n
echo ... check index - - - - - - - - - - - - - n i_equal 41
echo ... check english - - - - - - - - - - - - - x_english w_equal årestræ
echo ... check point - - - - - - - - - - - - - x_point p_exists 0
get ... check line PREFIX__detail n s_equal 41 61 5årestræ 5 m 96 5årestræ 6år·z·<·æ ·
get ... check line PREFIX__detail_by_ptr n , x_point s_equal 41 61 5årestræ 5 m 96 5årestræ 6år·z·<·æ ·
exec call get english PREFIX_english x_point , x_again i_equal 0
echo ... check again - - - - - - - - - - - - - x_again w_equal årestræ
COND attempt with null prefix - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call find PREFIX__by_name NULL , x_english , x_gregg , &x_point i_lesser 0 n
echo ... check index - - - - - - - - - - - - - n i_lesser 0
echo ... check english - - - - - - - - - - - - - x_english w_equal åæ
echo ... check gregg - - - - - - - - - - - - - x_gregg w_equal åæ
echo ... check point - - - - - - - - - - - - - x_point p_null 0
get ... check line PREFIX__detail n s_equal n/a
get ... check line PREFIX__detail_by_ptr n , x_point s_equal n/a
exec call get english PREFIX_english x_point , x_again i_lesser 0
echo ... check again - - - - - - - - - - - - - x_again w_equal åæ
COND verify on a multi prefix - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call find PREFIX__by_name "self-con" , x_english , x_gregg , &x_point i_equal 124 n
echo ... check index - - - - - - - - - - - - - n i_equal 124
echo ... check english - - - - - - - - - - - - - x_english w_equal åselfconæ
echo ... check gregg - - - - - - - - - - - - - x_gregg w_equal ås·k·<·æ
echo ... check point - - - - - - - - - - - - - x_point p_exists 0
get ... check line PREFIX__detail n s_equal 124 189 8åself-conæ 5 m 106 7åselfconæ 6ås·k·<·æ ·
get ... check line PREFIX__detail_by_ptr n , x_point s_equal 124 189 8åself-conæ 5 m 106 7åselfconæ 6ås·k·<·æ ·
exec call get english PREFIX_english x_point , x_again i_equal 0
echo ... check again - - - - - - - - - - - - - x_again w_equal åselfconæ
COND complete testing - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.004)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec stop testing PROG__unit_end i_equal 0
#23456789-12 123456789-123456789-123456789-12345 123456789-123456789-123456 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789- 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789-123456789-
#==(verb)=== ===========(description)=========== =====(function)=========== ========================(arguments)================================================================= ==(test)== ==========================(results)================================================================= ========(var)=======
SCRP (PREFIX) verify prefix driver 0s driver PREFIX_driver ((02.---)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND initialize the testing environment - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.001)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec start testing PROG__unit_quiet i_equal 0
local create working/return variable - - - - - - - - - - - - - void *x_point = NULL;
local create working/return variable - - - - - - - - - - - - - char x_english [LEN_LABEL] = "";
local create working/return variable - - - - - - - - - - - - - char x_gregg [LEN_LABEL] = "";
REUSE -C- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
REUSE -D- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND verify quick, no prefix run - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
code prepare english - - - - - - - - - - - - - strcpy (x_english, "test" );
code prepare english - - - - - - - - - - - - - strcpy (x_gregg , "t·e·z·t" );
exec call driver PREFIX_driver "" , x_english , x_gregg , &x_point i_equal 0
echo ... check english - - - - - - - - - - - - - x_english w_equal åtestæ
echo ... check gregg - - - - - - - - - - - - - x_gregg w_equal åt·e·z·tæ
echo ... check point - - - - - - - - - - - - - x_point p_null 0
get ... check line PREFIX__detail_by_ptr 0 , x_point s_equal n/a
COND verify quick, simple prefix - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
code prepare english - - - - - - - - - - - - - strcpy (x_english, "test" );
code prepare english - - - - - - - - - - - - - strcpy (x_gregg , "t·e·z·t" );
exec call driver PREFIX_driver "re" , x_english , x_gregg , &x_point i_equal 0
echo ... check english - - - - - - - - - - - - - x_english w_equal åretestæ
echo ... check gregg - - - - - - - - - - - - - x_gregg w_equal år·<·t·e·z·tæ
echo ... check point - - - - - - - - - - - - - x_point p_exists 0
get ... check line PREFIX__detail_by_ptr 0 , x_point s_equal ¬¬¬ 59 2åreæ 5 m 81 2åreæ 4år·<·æ ·
COND attempt with nulls - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
code prepare english - - - - - - - - - - - - - strcpy (x_english, "test" );
code prepare english - - - - - - - - - - - - - strcpy (x_gregg , "t·e·z·t" );
exec call driver PREFIX_driver NULL , x_english , x_gregg , &x_point i_lesser 0
echo ... check point - - - - - - - - - - - - - x_point p_null 0
get ... check line PREFIX__detail_by_ptr 0 , x_point s_equal n/a
exec call driver PREFIX_driver "re" , NULL , x_gregg , &x_point i_lesser 0
echo ... check point - - - - - - - - - - - - - x_point p_null 0
get ... check line PREFIX__detail_by_ptr 0 , x_point s_equal n/a
exec call driver PREFIX_driver "re" , x_english , NULL , &x_point i_lesser 0
echo ... check point - - - - - - - - - - - - - x_point p_null 0
get ... check line PREFIX__detail_by_ptr 0 , x_point s_equal n/a
exec call driver PREFIX_driver "re" , x_english , x_gregg , NULL i_lesser 0
echo ... check point - - - - - - - - - - - - - x_point p_null 0
get ... check line PREFIX__detail_by_ptr 0 , x_point s_equal n/a
COND verify a truncated prefix - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
code prepare english - - - - - - - - - - - - - strcpy (x_english, "test" );
code prepare english - - - - - - - - - - - - - strcpy (x_gregg , "t·e·z·t" );
exec call driver PREFIX_driver "re×" , x_english , x_gregg , &x_point i_equal 0
echo ... check english - - - - - - - - - - - - - x_english w_equal årtestæ
echo ... check gregg - - - - - - - - - - - - - x_gregg w_equal år·<·t·e·z·tæ
echo ... check point - - - - - - - - - - - - - x_point p_exists 0
get ... check line PREFIX__detail_by_ptr 0 , x_point s_equal ¬¬¬ 59 2åreæ 5 m 81 2åreæ 4år·<·æ ·
COND attempt with a illegal prefix - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
code prepare english - - - - - - - - - - - - - strcpy (x_english, "test" );
code prepare english - - - - - - - - - - - - - strcpy (x_gregg , "t·e·z·t" );
exec call driver PREFIX_driver "GOB" , x_english , x_gregg , &x_point i_lesser 0
echo ... check point - - - - - - - - - - - - - x_point p_null 0
get ... check line PREFIX__detail_by_ptr 0 , x_point s_equal n/a
COND verify a truncated root - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
code prepare english - - - - - - - - - - - - - strcpy (x_english, "test" );
code prepare english - - - - - - - - - - - - - strcpy (x_gregg , "t·e·z·t" );
exec call driver PREFIX_driver "reÖ" , x_english , x_gregg , &x_point i_equal 0
echo ... check english - - - - - - - - - - - - - x_english w_equal åreestæ
echo ... check gregg - - - - - - - - - - - - - x_gregg w_equal år·<·t·e·z·tæ
echo ... check point - - - - - - - - - - - - - x_point p_exists 0
get ... check line PREFIX__detail_by_ptr 0 , x_point s_equal ¬¬¬ 59 2åreæ 5 m 81 2åreæ 4år·<·æ ·
COND verify with a no-prefix symbol - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
code prepare english - - - - - - - - - - - - - strcpy (x_english, "test" );
code prepare english - - - - - - - - - - - - - strcpy (x_gregg , "t·e·z·t" );
exec call driver PREFIX_driver "´" , x_english , x_gregg , &x_point i_equal 0
echo ... check english - - - - - - - - - - - - - x_english w_equal åtestæ
echo ... check gregg - - - - - - - - - - - - - x_gregg w_equal åt·e·z·tæ
echo ... check point - - - - - - - - - - - - - x_point p_null 0
get ... check line PREFIX__detail_by_ptr 0 , x_point s_equal n/a
COND verify the other no-prefix symbol - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
code prepare english - - - - - - - - - - - - - strcpy (x_english, "test" );
code prepare english - - - - - - - - - - - - - strcpy (x_gregg , "t·e·z·t" );
exec call driver PREFIX_driver "·" , x_english , x_gregg , &x_point i_equal 0
echo ... check english - - - - - - - - - - - - - x_english w_equal åtestæ
echo ... check gregg - - - - - - - - - - - - - x_gregg w_equal åt·e·z·tæ
echo ... check point - - - - - - - - - - - - - x_point p_null 0
get ... check line PREFIX__detail_by_ptr 0 , x_point s_equal n/a
COND complete testing - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.004)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec stop testing PROG__unit_end i_equal 0
#23456789-12 123456789-123456789-123456789-12345 123456789-123456789-123456 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789- 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789-123456789-
#==(verb)=== ===========(description)=========== =====(function)=========== ========================(arguments)================================================================= ==(test)== ==========================(results)================================================================= ========(var)=======
SCRP (PREFIX) verify writing and reading a database 0s database PREFIX_write, PREFIX_read ((02.---)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND initialize the testing environment - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.001)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec start testing PROG__unit_quiet i_equal 0
local create working/return variable - - - - - - - - - - - - - char x_name [LEN_HUND] = "/tmp/prefix.db";
local create working/return variable - - - - - - - - - - - - - FILE *x_db = NULL;
local create working/return variable - - - - - - - - - - - - - short x_count = 0;
exec remove test file yURG_rm x_name i_equal 0
REUSE -C- add a standard prefix table - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.008)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
REUSE -D- verify the prefixes are loaded - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.008)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND verify writing the database - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.001)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call open SHARED_open x_name , 'W' , &x_db i_equal 0
exec call write PREFIX_write x_db i_equal 0
exec call close SHARED_close &x_db i_equal 0
code ... save count - - - - - - - - - - - - - x_count = PREFIX__count ();;
echo ... check count - - - - - - - - - - - - - x_count i_equal 125
COND purge all entries - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.004)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call purge PREFIX__purge i_equal 0
get ... check count PREFIX__count i_equal 0
get ... check line PREFIX__detail 0 s_equal n/a
get ... check line PREFIX__detail 1 s_equal n/a
get ... check line PREFIX__detail 2 s_equal n/a
get ... check line PREFIX__detail 3 s_equal n/a
COND verify reading the database - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.001)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call open SHARED_open x_name , 'R' , &x_db i_equal 0
exec call read PREFIX_read x_db , x_count i_equal 0
exec call close SHARED_close &x_db i_equal 0
REUSE -D- verify the prefixes are loaded - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.008)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND complete testing - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.004)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec remove test file yURG_rm x_name i_equal 0
exec stop testing PROG__unit_end i_equal 0
#23456789-12 123456789-123456789-123456789-12345 123456789-123456789-123456 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789- 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789-123456789-
#==(verb)=== ===========(description)=========== =====(function)=========== ========================(arguments)================================================================= ==(test)== ==========================(results)================================================================= ========(var)=======
SCRP (PREFIX) verify encoding and decoding prefix entries 0s encode PREFIX_encode, PREFIX_decode ((02.---)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND initialize the testing environment - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.001)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec start testing PROG__unit_quiet i_equal 0
local create working/return variable - - - - - - - - - - - - - void *x_point = NULL;
local create working/return variable - - - - - - - - - - - - - short n = -1;
REUSE -C- add a standard prefix table - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.008)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
REUSE -D- verify the prefixes are loaded - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.008)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND verify simple success - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.001)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call find PREFIX__by_name "de" , NULL , NULL , &x_point i_equal 3 n
echo ... check return - - - - - - - - - - - - - n i_equal 3
echo ... check point - - - - - - - - - - - - - x_point p_exists 0
exec call encode PREFIX_encode x_point i_equal [[ n ]]
exec call decode PREFIX_decode n p_equal [[ x_point ]]
COND verify with a null - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.001)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call encode PREFIX_encode NULL i_equal 0
exec call decode PREFIX_decode 0 p_equal NULL
COND verify another - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.001)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call find PREFIX__by_name "ultra" , NULL , NULL , &x_point i_equal 114 n
echo ... check return - - - - - - - - - - - - - n i_equal 114
echo ... check point - - - - - - - - - - - - - x_point p_exists 0
exec call encode PREFIX_encode x_point i_equal [[ n ]]
exec call decode PREFIX_decode n p_equal [[ x_point ]]
COND complete testing - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.004)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec stop testing PROG__unit_end i_equal 0
# end-of-file. done, finito, completare, whimper [Ï´···