summaryrefslogtreecommitdiff
path: root/biblio/bibtex/bibtex-x/tests/testname.bst
diff options
context:
space:
mode:
Diffstat (limited to 'biblio/bibtex/bibtex-x/tests/testname.bst')
-rw-r--r--biblio/bibtex/bibtex-x/tests/testname.bst64
1 files changed, 64 insertions, 0 deletions
diff --git a/biblio/bibtex/bibtex-x/tests/testname.bst b/biblio/bibtex/bibtex-x/tests/testname.bst
new file mode 100644
index 0000000000..d9addb41d0
--- /dev/null
+++ b/biblio/bibtex/bibtex-x/tests/testname.bst
@@ -0,0 +1,64 @@
+% 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 {author}{}{}
+
+STRINGS { s }
+
+INTEGERS { nameptr namesleft numnames }
+
+FUNCTION {format.names}
+{ 's :=
+ #1 'nameptr :=
+ s num.names$ 'numnames :=
+ numnames 'namesleft :=
+ { namesleft #0 > }
+ { " [" nameptr int.to.str$ * "]" * write$
+ " {ff} " s nameptr "{ff}" format.name$ * write$
+ " {ll} " s nameptr "{ll}" format.name$ * write$
+ " {vv} " s nameptr "{vv}" format.name$ * write$
+ " {jj} " s nameptr "{jj}" format.name$ * write$ newline$
+ " | " s nameptr "{ff}{vv}{ll}{jj}" format.name$ * write$
+ " | " s nameptr "{ff }{vv }{ll}{ jj}" format.name$ * write$
+ " | " s nameptr "{vv~}{ll}{, jj}{, f.}" format.name$ * write$
+ " | " s nameptr "{f.~}{v.~}{ll}{, jj}" format.name$ * write$
+ newline$
+ nameptr #1 + 'nameptr :=
+ namesleft #1 - 'namesleft :=
+ }
+ while$
+}
+
+FUNCTION {output_entry} {
+ "\item " author * write$ newline$
+ author format.names
+}
+
+FUNCTION {book} {output_entry}
+
+READ
+
+FUNCTION {set_sort_key} {
+ author '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}