diff options
| author | Thibaut Horel <thibaut.horel@gmail.com> | 2016-02-21 22:21:06 -0500 |
|---|---|---|
| committer | Thibaut Horel <thibaut.horel@gmail.com> | 2016-02-21 22:21:06 -0500 |
| commit | 99e5114a8b22ce692fb6cbf26b0b11908dde69e8 (patch) | |
| tree | a4e24d38735634b7acad5b5af2493ab0495f66fb /testdata/names.bst | |
| parent | 86cddf333ee9a80a4ea0a68814face6a32ced48b (diff) | |
| download | bibtex-99e5114a8b22ce692fb6cbf26b0b11908dde69e8.tar.gz | |
Add a few tests
Diffstat (limited to 'testdata/names.bst')
| -rw-r--r-- | testdata/names.bst | 38 |
1 files changed, 38 insertions, 0 deletions
diff --git a/testdata/names.bst b/testdata/names.bst new file mode 100644 index 0000000..a72e888 --- /dev/null +++ b/testdata/names.bst @@ -0,0 +1,38 @@ +ENTRY + { + author + } + {} + { label } + +INTEGERS { nameptr namesleft numnames } + +STRINGS { s t } + +FUNCTION {format.names} +{ 's := + #1 'nameptr := + s num.names$ 'numnames := + numnames 'namesleft := + { namesleft #0 > } + { + s nameptr "{ff}|{vv}|{ll}|{jj}" format.name$ write$ newline$ + s nameptr "{f}|{v}|{l}|{j}" format.name$ write$ newline$ + s nameptr "{ff~}{vv~}{ll}{, jj}" format.name$ write$ newline$ + s nameptr "{f~}{vv~}{ll}{, jj}" format.name$ write$ newline$ + namesleft #1 - 'namesleft := + nameptr #1 + 'nameptr := + } + while$ +} + +FUNCTION {format.authors} +{ author empty$ + { "" } + { author format.names } + if$ +} + +READ + +ITERATE {format.authors} |
