blob: a332f82a0008eedfaa7f3b21abc29a55956fcfc6 (
plain)
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
|
% BibTeX test style file
% Copyright 2022 TANAKA Takuji <ttk@t-lab.opal.ne.jp>
% You may freely use, modify and/or distribute this file.
ENTRY {field}{}{}
FUNCTION {output_entry} {
"\item[orig] " field * write$ newline$
"\item[1 5] " field #1 #5 substring$ * write$ newline$
"\item[1 4] " field #1 #4 substring$ * write$ newline$
"\item[1 3] " field #1 #3 substring$ * write$ newline$
"\item[1 2] " field #1 #2 substring$ * write$ newline$
"\item[1 1] " field #1 #1 substring$ * write$ newline$
"\item[2 1] " field #2 #1 substring$ * write$ newline$
"\item[3 1] " field #3 #1 substring$ * write$ newline$
"\item[4 1] " field #4 #1 substring$ * write$ newline$
"\item[5 1] " field #5 #1 substring$ * write$ newline$
"\item[1 5] " field #1 #5 substring$ * write$ newline$
"\item[2 5] " field #2 #5 substring$ * write$ newline$
"\item[3 5] " field #3 #5 substring$ * write$ newline$
"\item[4 5] " field #4 #5 substring$ * write$ newline$
"\item[5 5] " field #5 #5 substring$ * write$ newline$
"\item[1 5] " field #1 #5 substring$ * write$ newline$
"\item[2 4] " field #2 #4 substring$ * write$ newline$
"\item[3 3] " field #3 #3 substring$ * write$ newline$
"\item[4 2] " field #4 #2 substring$ * write$ newline$
"\item[5 1] " field #5 #1 substring$ * write$ newline$
"\item[1 8] " field #1 #8 substring$ * write$ newline$
"\item[2 7] " field #2 #7 substring$ * write$ newline$
"\item[3 6] " field #3 #6 substring$ * write$ newline$
"\item[4 5] " field #4 #5 substring$ * write$ newline$
"\item[5 4] " field #5 #4 substring$ * write$ newline$
"\item[6 3] " field #6 #3 substring$ * write$ newline$
"\item[7 2] " field #7 #2 substring$ * write$ newline$
"\item[8 1] " field #8 #1 substring$ * write$ newline$
"\item[-1 5] " field #-1 #5 substring$ * write$ newline$
"\item[-1 4] " field #-1 #4 substring$ * write$ newline$
"\item[-1 3] " field #-1 #3 substring$ * write$ newline$
"\item[-1 2] " field #-1 #2 substring$ * write$ newline$
"\item[-1 1] " field #-1 #1 substring$ * write$ newline$
"\item[-2 1] " field #-2 #1 substring$ * write$ newline$
"\item[-3 1] " field #-3 #1 substring$ * write$ newline$
"\item[-4 1] " field #-4 #1 substring$ * write$ newline$
"\item[-5 1] " field #-5 #1 substring$ * write$ newline$
"\item[-1 5] " field #-1 #5 substring$ * write$ newline$
"\item[-2 5] " field #-2 #5 substring$ * write$ newline$
"\item[-3 5] " field #-3 #5 substring$ * write$ newline$
"\item[-4 5] " field #-4 #5 substring$ * write$ newline$
"\item[-5 5] " field #-5 #5 substring$ * write$ newline$
"\item[-1 5] " field #-1 #5 substring$ * write$ newline$
"\item[-2 4] " field #-2 #4 substring$ * write$ newline$
"\item[-3 3] " field #-3 #3 substring$ * write$ newline$
"\item[-4 2] " field #-4 #2 substring$ * write$ newline$
"\item[-5 1] " field #-5 #1 substring$ * write$ newline$
"\item[-1 8] " field #-1 #8 substring$ * write$ newline$
"\item[-2 7] " field #-2 #7 substring$ * write$ newline$
"\item[-3 6] " field #-3 #6 substring$ * write$ newline$
"\item[-4 5] " field #-4 #5 substring$ * write$ newline$
"\item[-5 4] " field #-5 #4 substring$ * write$ newline$
"\item[-6 3] " field #-6 #3 substring$ * write$ newline$
"\item[-7 2] " field #-7 #2 substring$ * write$ newline$
"\item[-8 1] " field #-8 #1 substring$ * write$ newline$
}
FUNCTION {type} {output_entry}
READ
FUNCTION {set_sort_key} {
field 'sort.key$ :=
}
ITERATE {set_sort_key}
SORT
FUNCTION {output_bgn} {
"\section*{Test result}" write$ newline$
"\begin{itemize}" write$ newline$
}
FUNCTION {output_end} {
"\end{itemize}" write$ newline$
"\endinput" write$ newline$
}
EXECUTE {output_bgn}
ITERATE {call.type$}
EXECUTE {output_end}
|
