blob: c744b6548cb702868549ccadc44222503ea144aa (
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
|
% BibTeXu test style file
% Copyright 2022 TANAKA Takuji <ttk@t-lab.opal.ne.jp>
% You may freely use, modify and/or distribute this file.
%
% Test for built-in functions is.cjk.str$ and is.kanji.str$
ENTRY {field}{}{}
FUNCTION {output_entry} {
"\item " field * write$
": " field is.cjk.str$ int.to.str$ * write$
" " field is.kanji.str$ int.to.str$ * write$
" hz:" field is.cjk.str$ #1 & int.to.str$ * write$
" kn:" field is.cjk.str$ #2 & int.to.str$ * write$
" hg:" field is.cjk.str$ #4 & int.to.str$ * write$
" bp:" field is.cjk.str$ #8 & int.to.str$ * write$
" misc:" field is.cjk.str$ #2048 & int.to.str$ * 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}
|