summaryrefslogtreecommitdiff
path: root/Build/source/extra/bibtex/btxmac.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/extra/bibtex/btxmac.tex')
-rw-r--r--Build/source/extra/bibtex/btxmac.tex842
1 files changed, 0 insertions, 842 deletions
diff --git a/Build/source/extra/bibtex/btxmac.tex b/Build/source/extra/bibtex/btxmac.tex
deleted file mode 100644
index b45b7e591ec..00000000000
--- a/Build/source/extra/bibtex/btxmac.tex
+++ /dev/null
@@ -1,842 +0,0 @@
-%% @texfile{
-%% author = "Karl Berry and Oren Patashnik",
-%% version = "0.99k",
-%% date = "13 Nov 1995",
-%% filename = "btxmac.tex",
-%% address = "Please use electronic mail",
-%% checksum = "842 4571 33524",
-%% email = "opbibtex@cs.stanford.edu",
-%% codetable = "ISO/ASCII",
-%% supported = "yes",
-%% docstring = "Defines macros that make BibTeX work with plain TeX",
-%% }
-% BibTeX-for-TeX macros, version 0.99k, for BibTeX 0.99c, TeX 3.0 or later.
-% Copyright (C) 1990-92,95 by Karl Berry & Oren Patashnik; all rights reserved.
-% You may copy this file provided: that it's accompanied by the
-% "BibTeXing" document, whose text is contained in the file `btxdoc.tex';
-% that any documentation you write for these macros also gives a
-% reference for "BibTeXing"; and that either you make absolutely no
-% changes to your copy, or if you do make changes, (1) you name the file
-% something other than `btxmac.tex' and you remove all occurrences of
-% `btxmac.tex' from the file, (2) you put, somewhere in the first twenty
-% lines of the file, your name, along with an electronic address at which
-% others who might use the file may reach you, and (3) you remove each
-% occurrence of Oren's name and electronic address from this file. These
-% restrictions help ensure that all standard versions of these macros are
-% identical, and that Oren doesn't get deluged with inappropriate e-mail.
-%
-% This file, btxmac.tex, contains TeX macros that allow BibTeX, a
-% bibliography program that was originally designed for use with LaTeX,
-% to work with plain TeX. Please report any bugs (outright goofs,
-% improvable macros, misfeatures, or unclear documentation) to Oren
-% Patashnik (opbibtex@cs.stanford.edu). These macros will become frozen
-% shortly after BibTeX version 1.00 is released.
-%
-% AMS-TEX WARNING: We tried very hard, for version .99i of these macros,
-% to make them compatible with AmS-TeX. We succeeded to the extent
-% that, if you use one of the standard bibliography styles, you probably
-% won't notice any problems with version 0.99i of btxmac.tex. But
-% ultimately we failed, in that the inherent incompatibilities between
-% plain TeX and AmS-TeX kept making these macros break, for certain
-% inputs or certain styles. Examples: (1) AmS-TeX treats at-signs as
-% special, in ways that plain TeX and LaTeX don't, so that, for example,
-% you can't have any `@' characters in an argument to the \cite command,
-% the way you can in TeX or LaTeX; (2) AmS-TeX decided that plain TeX's
-% and LaTeX's macron-accent control sequence `\=' should be undefined;
-% so you'll need to define `\=' to be `\B' to get the xampl.bib example
-% suggested below to work with AmS-TeX; (3) AmS-TeX redefines the tie
-% character `~' of plain TeX, and AmS-TeX's `amsppt' style redefines
-% plain TeX's `\nobreak' macro, so that if you use an author-date style
-% like `apalike' and you have a multiple-author reference for which the
-% author-date style automatically produces a citation in the text like
-% `(Jones et~al., 1992)' you will throw AmS-TeX's `amsppt' style into
-% an infinite loop, exceeding its input stack size. In practice, such
-% incompatibilities surface infrequently; but it is now clear to us that
-% it's not worth the effort (perhaps it's not even possible) to make the
-% btxmac.tex macros robust when used both with plain TeX and Ams-TeX.
-% If the BibTeX/AmS-TeX results attainable with the current btxmac.tex
-% macros are sufficient, fine. But if there's a demand for more robust
-% BibTeX/AmS-TeX behavior, then someone who's very familiar with the
-% AmS-TeX package should probably make an amsbtxmc.tex version of the
-% macros (remembering to follow the copyright restrictions above).
-% Until then, if you're an AmS-TeX user, or a LaTeX or plain TeX user
-% sharing files with an AmS-TeX user, beware.
-% END OF AMS-TEX WARNING.
-%
-% To use these macros you should be familiar with how BibTeX interacts
-% with LaTeX, since BibTeX's interaction with TeX is very similar; that
-% interaction is explained in the LaTeX manual. It also helps to
-% have read "BibTeXing", the documentation that accompanies BibTeX.
-% Then, if you want, you should redefine any of the macros that begin
-% with `\bbl' or `\biblabel' or `\print' that you need to get formatting
-% different from the default (the default settings are designed to
-% accompany a bibliography style like BibTeX's standard style `plain').
-% The macros you might want to change are described briefly a few
-% paragraphs hence. [To get started without reading any documentation,
-% try running the nine-line .tex file below through TeX and BibTeX.
-% Remember the general scheme: Running (La)TeX writes information on
-% the .aux (auxiliary) file; then running BibTeX reads information from
-% the .aux, .bst (style), and .bib (database) files, and writes
-% information (the bibliography) on a .bbl file; then running (La)TeX
-% incorporates the bibliography; then running (La)TeX once more fixes
-% the remaining forward references into the bibliography. Thus, to get
-% everything incorporated into your output, you'll have to run (La)TeX,
-% BibTeX, (La)TeX, (La)TeX. (Standup, sitdown, fight, fight, fight.)]
-%
-% These macros can stand alone or they can be \input into a macro
-% package, like Eplain, that is sufficiently compatible with plain TeX.
-% To use these macros to format the 0.99 version of the xampl.bib file
-% that's distributed with BibTeX (that version of the file has no
-% self-identification), you'll need to define \mbox, which is a LaTeX
-% command, to be \hbox, as in the example below.
-%
-% Here's a nine-line plain TeX file for trying out btxmac.tex; of course
-% you'll have to remove the comment characters at the beginning of each
-% line, and, depending on your system, you might have to take steps so
-% that BibTeX can "see" the files xampl.bib and plain.bst (BibTeX will
-% give you two empty-field warning messages that you should ignore).
-%
-% \def\mbox#1{\leavevmode\hbox{#1}}
-% \input btxmac
-% \noindent This cites Aamport's gnominious article~\cite{article-full}.
-% \medskip
-% \leftline{\bf References}
-% \nocite{*} % put all database entries into the reference list
-% \bibliography{xampl} % specify the database files; here, just xampl.bib
-% \bibliographystyle{plain} % specify plain.bst as the style file
-% \bye
-%
-%
-% HISTORY
-%
-% Karl Berry wrote the original version of these macros in 1989 and
-% 1990, for use in his `Eplain' package. Oren Patashnik modified them
-% slightly in July 1990, as part of the official BibTeX distribution.
-%
-% 1-Aug-90 Version 0.99a, not released to the general public.
-% 14-Aug-90 0.99b, first general release.
-% 26-Aug-90 0.99c, made \@undefinedmessage work with other macro packages.
-% 6-Sep-90 0.99d, allowed for general formatting of bibliography labels,
-% for general formatting of (in-text) citations, and for
-% changing certain catcodes while reading the .aux file.
-% 14-Nov-90 0.99e, changed the way \@setletters works, made some \new...'s
-% non-outer, and changed the way Eplain reads this file.
-% 12-Dec-90 0.99f, made \@resetnumerals change the `,' and `.' catcodes; and
-% added \biblabelextrahang, \@getoptionalarg, and \bblsc.
-% 11-Mar-91 0.99g, made a few minor changes required by the way Eplain reads
-% this file, but no functional changes.
-% 24-Apr-91 0.99h, inhibited the reading and writing of the .aux file if it
-% isn't used or if the \noauxfile macro is defined, and
-% removed some .aux-file-opening detritus; printed the
-% cite-key of undefined citations in \tt font; changed the
-% catcode of `_' inside \cite; and called \@resetnumerals
-% from inside a group.
-% 29-Feb-92 0.99i, made these macros semi-compatible with AmS-TeX; removed
-% \@resetnumerals, \@setletters, \@tokstostring, and
-% friends; changed the way \cite handles catcodes; changed
-% \@getoptionalarg, and had \bibitem and \newcommand use
-% it; added \@futurenonspacelet and (to facilitate the use
-% of multiple reference lists) \bblfilebasename; changed
-% \biblabelprint to use the new macros \biblabelprecontents
-% and \biblabelpostcontents, and to, by default, right-
-% justify numeric labels; and renamed \biblabelextrahang to
-% the more descriptive \biblabelextraspace.
-% 14-Mar-92 0.99j, made 0.99i's use of `\\' local to btxmac.tex.
-% 13-Nov-95 0.99k, defined \begin and \end (while reading bbl file) only if
-% it wasn't already defined.
-%
-%
-% The LaTeX-related commands defined in this file include (a) the four
-% commands that a user types (\bibliography, \bibliographystyle, \cite,
-% and \nocite); (b) the three commands that BibTeX looks for in the .aux
-% file (\bibdata, \bibstyle, and \citation---there is a fourth command
-% that BibTeX looks for, but that command is related to LaTeX's \include
-% facility, so these macros ignore that command); and (c) a LaTeX
-% command (\newcommand) that's written by one of the four standard
-% bibliography styles (alpha). The definitions here are not exactly the
-% same as the corresponding LaTeX definitions (those eight LaTeX
-% definitions depend on a significant fraction of LaTeX itself). But
-% the only substantial differences are with \newcommand, which here,
-% without complaining, lets you redefine a preexisting control sequence
-% (in LaTeX, \newcommand won't let you redefine a preexisting command),
-% and which here doesn't make the control sequences it defines \long (in
-% LaTeX, that happens automatically); there may also be other minor
-% differences. To summarize: Unless you know what you're doing, you
-% shouldn't define any control sequences with these eight names:
-%
-% \bibdata
-% \bibliography
-% \bibliographystyle
-% \bibstyle
-% \citation
-% \cite
-% \newcommand
-% \nocite
-%
-% There are three other commands written by one or more of the four
-% standard (plain, abbrv, alpha, unsrt) or four semistandard (acm,
-% apalike, ieeetr, siam) bibliography styles; they take effect only
-% within the bibliography, and are redefinable, as explained later:
-%
-% \em
-% \newblock
-% \sc
-%
-% There's one control sequence you might want to use (but not redefine)
-% in redefining \biblabelprint:
-%
-% \biblabelwidth
-%
-% There are fifteen other control sequences (explained later in more detail)
-% that the macros of this file will use if you define them---you should
-% define them after the \input btxmac command but before the \bibliography
-% command. The first six begin with `\bbl' and affect fonts, spacing,
-% perhaps other characteristics of the bibliography, and which .bbl files
-% get read; the next five begin with `\biblabel' and determine how labels
-% are formatted in the bibliography; and the last four begin with `\print'
-% and determine how the in-text citations are formatted:
-%
-% \bblem
-% \bblfilebasename
-% \bblhook
-% \bblnewblock
-% \bblrm
-% \bblsc
-% \biblabelcontents
-% \biblabelprecontents
-% \biblabelprint
-% \biblabelpostcontents
-% \biblabelextraspace
-% \printbetweencitations
-% \printcitefinish
-% \printcitenote
-% \printcitestart
-%
-% If it's defined before the \input btxmac command, the control sequence
-% below inhibits the reading and writing of the .aux file(s), and the
-% issuing of related warning messages. Any definition will do. This
-% feature might help when you're working on draft stages of a document:
-%
-% \noauxfile
-%
-%
-% Here's another control sequence (it's described later) that you
-% probably won't want to redefine unless you are writing another macro
-% package; if you do redefine it, however, do it before the \input btxmac
-% command (and notice that it has an `@' in its name):
-%
-% \@undefinedmessage
-%
-% Any other control sequence in this file that might conflict with
-% something you've defined will have an `@' in its name, so such conflicts
-% are unlikely; but if you're worried about a specific control sequence
-% name, do a text search of this file to look for it.
-%
-%
-% So to start things off we turn `@' into a letter (category code 11),
-% keeping track of the old category code for future restoration.
-% (Simply resetting it to 12 when we leave these macros is
-% insufficient.) The use of `\cite' as a temporary control sequence is
-% a kludge, but it's a reasonably simple way to accomplish what we need
-% without possibly overwriting something (without an `@' in its name)
-% that might already be defined.
-%
-\edef\cite{\the\catcode`@}%
-\catcode`@ = 11
-\let\@oldatcatcode = \cite
-\chardef\@letter = 11
-\chardef\@other = 12
-%
-%
-% Next come some things that will be useful later.
-%
-% Make an outer definition into an inner one (due to Chris Thompson).
-% The arguments should be the control sequence to be defined, and the
-% new of the \outer control sequence, as characters; the control
-% sequence #1 is defined to be just the same as \csname#2\endcsname, but
-% not \outer. For example, \@innerdef\innernewcount{newcount} would
-% define \innernewcount to be a non-outer version of \newcount.
-%
-\def\@innerdef#1#2{\edef#1{\expandafter\noexpand\csname #2\endcsname}}%
-%
-% We use \@innerdef to make some of our allocations local, because
-% Eplain includes our code inside a conditional. We put @'s in the
-% names to minimize the (already small) chance of conflicts.
-%
-\@innerdef\@innernewcount{newcount}%
-\@innerdef\@innernewdimen{newdimen}%
-\@innerdef\@innernewif{newif}%
-\@innerdef\@innernewwrite{newwrite}%
-%
-%
-% Swallow one parameter.
-%
-\def\@gobble#1{}%
-%
-%
-% Use TeX 3.0's \inputlineno to get the line number, for better error
-% messages, but if we're using an old version of TeX, don't do anything.
-%
-\ifx\inputlineno\@undefined
- \let\@linenumber = \empty % Pre-3.0.
-\else
- \def\@linenumber{\the\inputlineno:\space}%
-\fi
-%
-%
-% The following macro \@futurenonspacelet (from the TeXbook) behaves
-% essentially like \futurelet except that it discards any implicit or
-% explicit space tokens that intervene before a nonspace is scanned:
-%
-\def\@futurenonspacelet#1{\def\cs{#1}%
- \afterassignment\@stepone\let\@nexttoken=
-}%
-\begingroup % The grouping here avoids stepping on an outside use of `\\'.
-\def\\{\global\let\@stoken= }%
-\\ % now \@stoken is a space token (\\ is a control symbol, so that
- % space after it is seen).
-\endgroup
-\def\@stepone{\expandafter\futurelet\cs\@steptwo}%
-\def\@steptwo{\expandafter\ifx\cs\@stoken\let\@@next=\@stepthree
- \else\let\@@next=\@nexttoken\fi \@@next}%
-\def\@stepthree{\afterassignment\@stepone\let\@@next= }%
-%
-%
-% \@getoptionalarg\CS gets an optional argument from the input, enclosed
-% in brackets, then expands \CS. We set \@optionalarg to \empty if we
-% don't find one, otherwise to the text of the argument. This assumes
-% the brackets don't have a funny category code.
-%
-\def\@getoptionalarg#1{%
- \let\@optionaltemp = #1%
- \let\@optionalnext = \relax
- \@futurenonspacelet\@optionalnext\@bracketcheck
-}%
-%
-% The \expandafter's in this macro let us avoid the use of \aftergroup,
-% which is somewhat more expensive.
-%
-\def\@bracketcheck{%
- \ifx [\@optionalnext
- \expandafter\@@getoptionalarg
- \else
- \let\@optionalarg = \empty
- % We can't do the \temp after the \fi, because then the \temp gets
- % in the way of reading the optional argument from the input, if
- % we do have one.
- \expandafter\@optionaltemp
- \fi
-}%
-%
-\def\@@getoptionalarg[#1]{%
- \def\@optionalarg{#1}%
- \@optionaltemp
-}%
-%
-%
-% From LaTeX.
-%
-\def\@nnil{\@nil}%
-\def\@fornoop#1\@@#2#3{}%
-%
-\def\@for#1:=#2\do#3{%
- \edef\@fortmp{#2}%
- \ifx\@fortmp\empty \else
- \expandafter\@forloop#2,\@nil,\@nil\@@#1{#3}%
- \fi
-}%
-%
-\def\@forloop#1,#2,#3\@@#4#5{\def#4{#1}\ifx #4\@nnil \else
- #5\def#4{#2}\ifx #4\@nnil \else#5\@iforloop #3\@@#4{#5}\fi\fi
-}%
-%
-\def\@iforloop#1,#2\@@#3#4{\def#3{#1}\ifx #3\@nnil
- \let\@nextwhile=\@fornoop \else
- #4\relax\let\@nextwhile=\@iforloop\fi\@nextwhile#2\@@#3{#4}%
-}%
-%
-%
-% This macro tests if a file \jobname.#1 exists, and sets \if@fileexists
-% appropriately. If an optional argument is given, it is used as the
-% root part of the filename instead of \jobname.
-%
-\@innernewif\if@fileexists
-%
-\def\@testfileexistence{\@getoptionalarg\@finishtestfileexistence}%
-\def\@finishtestfileexistence#1{%
- \begingroup
- \def\extension{#1}%
- \immediate\openin0 =
- \ifx\@optionalarg\empty\jobname\else\@optionalarg\fi
- \ifx\extension\empty \else .#1\fi
- \space
- \ifeof 0
- \global\@fileexistsfalse
- \else
- \global\@fileexiststrue
- \fi
- \immediate\closein0
- \endgroup
-}%
-%
-%
-%% [[[start of BibTeX-specific stuff]]]
-%
-% Now come the four main LaTeX commands and their associated .aux
-% commands. Just as in LaTeX, \bibliographystyle defines the BibTeX
-% style name (.bst file, that is), and \bibliography defines the
-% database (.bib) file(s). The corresponding .aux-file commands are
-% \bibstyle and \bibdata, which are there only for BibTeX's (but not
-% LaTeX's) use.
-%
-\def\bibliographystyle#1{%
- \@readauxfile
- \@writeaux{\string\bibstyle{#1}}%
-}%
-\let\bibstyle = \@gobble
-%
-% As well as writing the \bibdata command to tell BibTeX which .bib
-% files to read, we read the .bbl file that BibTeX (or a person,
-% conceivably) has produced. We use \bblfilebasename as the root of the
-% filename to read; this defaults to \jobname.
-%
-\let\bblfilebasename = \jobname
-\def\bibliography#1{%
- \@readauxfile
- \@writeaux{\string\bibdata{#1}}%
- \@testfileexistence[\bblfilebasename]{bbl}%
- \if@fileexists
- % We just output a non-discardable item (the `whatsit' with the
- % \bibdata command). This means that the glue that will be
- % inserted next (\parskip or \baselineskip, most likely) will be a
- % legal breakpoint. Most likely, this is after some kind of
- % heading, where we don't want to allow a page break. So:
- \nobreak
- \@readbblfile
- \fi
-}%
-\let\bibdata = \@gobble
-%
-% The \nocite{label,label,...} command writes its argument to \@auxfile,
-% unless instructed not to, but produces no text in the document. Both
-% the \nocite and \cite commands produce \citation commands in the .aux file.
-%
-\def\nocite#1{%
- \@readauxfile
- \@writeaux{\string\citation{#1}}%
-}%
-%
-\@innernewif\if@notfirstcitation
-%
-% \cite[note]{label,label,...} produces the citations for the labels as
-% well. If the optional argument `note' is present, it's added after
-% the labels. Since \cite calls \nocite to do its .aux-file writing,
-% \cite doesn't need to call \@readauxfile (\nocite does).
-%
-\def\cite{\@getoptionalarg\@cite}%
-%
-% Typeset the citations for the labels in #1, followed by the note, if
-% it exists. To change the citation's format in the text, redefine one
-% or more `\print...' macros, whose defaults appear later in this file.
-%
-\def\@cite#1{%
- % Remember the optional argument, in case one of the macros we call
- % below ends up looking for an optional argument itself. For
- % example, if a \cite[note] triggers reading the .aux file, then the
- % [note] would be clobbered, since \@testfileexistence looks for an
- % optional arg.
- \let\@citenotetext = \@optionalarg
- % Start printing the text, beginning with a left bracket by default.
- \printcitestart
- % It's complicated, but because \nocite puts a `whatsit' onto the list,
- % \nocite should follow \printcitestart. It's conceivable, but very
- % unlikely, that this `whatsit' will cause a problem (glue that doesn't
- % disappear when you want it to is the most likely symptom), requiring
- % a change either to \printcitestart or to the label that the .bst file
- % produces.
- \nocite{#1}%
- \@notfirstcitationfalse
- \@for \@citation :=#1\do
- {%
- \expandafter\@onecitation\@citation\@@
- }%
- \ifx\empty\@citenotetext\else
- \printcitenote{\@citenotetext}%
- \fi
- \printcitefinish
-}%
-%
-\def\@onecitation#1\@@{%
- \if@notfirstcitation
- \printbetweencitations
- \fi
- %
- \expandafter \ifx \csname\@citelabel{#1}\endcsname \relax
- \if@citewarning
- \message{\@linenumber Undefined citation `#1'.}%
- \fi
- % Give it a dummy definition:
- \expandafter\gdef\csname\@citelabel{#1}\endcsname{%
- {\tt
- \escapechar = -1
- \nobreak\hskip0pt
- \expandafter\string\csname#1\endcsname
- \nobreak\hskip0pt
- }%
- }%
- \fi
- % Now produce the text, whether it was undefined or not.
- \csname\@citelabel{#1}\endcsname
- \@notfirstcitationtrue
-}%
-%
-% Given a label `foo', the macro `\b@foo' is supposed to
-% hold the text that should be produced.
-%
-\def\@citelabel#1{b@#1}%
-%
-% So, how does a citation label get defined? When we read the .bbl file
-% (below), a \bibitem writes out a \@citedef command. And when we read
-% the \@citedef, we define \@citelabel{#1}, where #1 is the user's
-% label.
-%
-\def\@citedef#1#2{\expandafter\gdef\csname\@citelabel{#1}\endcsname{#2}}%
-%
-%
-% Reading the .bbl file also produces the typeset bibliography. Please
-% notice, however, that we do not produce the title for the references
-% (e.g., `References'), as LaTeX does. The formatting and spacing of
-% that title, whether it should go into the headline, and so on, are all
-% things determined by your format. We cannot know those things in
-% advance. If you wish, you can define \bblhook to produce the title.
-% Or just do it before the \bibliography command.
-%
-\def\@readbblfile{%
- % Define a counter to tell us which item number we are on, unless
- % we've already defined it (because the document has more than one
- % bibliography).
- \ifx\@itemnum\@undefined
- \@innernewcount\@itemnum
- \fi
- %
- \begingroup
- % If another package has already defined \begin, don't define our
- % own simplistic \begin and \end; assume they want to take care of
- % it themselves. (That way, their \begin's and \end's for other
- % things can be used in the bib files.)
- \ifx\begin\@undefined
- \def\begin##1##2{%
- % ##1 is just `thebibliography'.
- % ##2 is the widest label.
- % We set (new dimen) \biblabelwidth based on the widest label
- \setbox0 = \hbox{\biblabelcontents{##2}}%
- \biblabelwidth = \wd0
- }%
- \let\end = \@gobble % The arg is `thebibliography' again.
- \fi
- %
- % Here we have two possibilities:
- % \bibitem[typesetlabel]{citationlabel}
- % \bibitem{citationlabel}
- % If we have the second of these, the citations are numbered, starting
- % from one; we use our own count register \@itemnum for this.
- %
- \@itemnum = 0
- \def\bibitem{\@getoptionalarg\@bibitem}%
- \def\@bibitem{%
- \ifx\@optionalarg\empty
- \expandafter\@numberedbibitem
- \else
- \expandafter\@alphabibitem
- \fi
- }%
- \def\@alphabibitem##1{%
- % Need \xdef here for various reasons.
- \expandafter \xdef\csname\@citelabel{##1}\endcsname {\@optionalarg}%
- % Left-justify alpha labels, unless \biblabel{pre,post}contents
- % are already defined.
- \ifx\biblabelprecontents\@undefined
- \let\biblabelprecontents = \relax
- \fi
- \ifx\biblabelpostcontents\@undefined
- \let\biblabelpostcontents = \hss
- \fi
- \@finishbibitem{##1}%
- }%
- %
- \def\@numberedbibitem##1{%
- \advance\@itemnum by 1
- \expandafter \xdef\csname\@citelabel{##1}\endcsname{\number\@itemnum}%
- % Right-justify numeric labels, unless \biblabel{pre,post}contents
- % are already defined.
- \ifx\biblabelprecontents\@undefined
- \let\biblabelprecontents = \hss
- \fi
- \ifx\biblabelpostcontents\@undefined
- \let\biblabelpostcontents = \relax
- \fi
- \@finishbibitem{##1}%
- }%
- %
- \def\@finishbibitem##1{%
- \biblabelprint{\csname\@citelabel{##1}\endcsname}%
- \@writeaux{\string\@citedef{##1}{\csname\@citelabel{##1}\endcsname}}%
- \ignorespaces
- }%
- %
- % Do the printing (we're producing the bibliography, remember).
- %
- \let\em = \bblem
- \let\newblock = \bblnewblock
- \let\sc = \bblsc
- % Punctuation won't affect spacing;
- \frenchspacing
- % the penalties below are from LaTeX's [article,book,report].sty;
- \clubpenalty = 4000 \widowpenalty = 4000
- % the next two values come from LaTeX's \sloppy command;
- \tolerance = 10000 \hfuzz = .5pt
- \everypar = {\hangindent = \biblabelwidth
- \advance\hangindent by \biblabelextraspace}%
- \bblrm
- % the \parskip is a guess at what looks good;
- \parskip = 1.5ex plus .5ex minus .5ex
- % and the space between label and text comes from LaTeX's \labelsep.
- \biblabelextraspace = .5em
- \bblhook
- %
- \input \bblfilebasename.bbl
- \endgroup
-}%
-%
-% The widest label's width is useful for redefining \biblabelprint;
-% you redefine \biblabelwidth, in effect, by redefining the
-% \biblabelcontents macro that appears below. And \biblabelextraspace,
-% which is redefinable inside \bblhook, is added to \biblabelwidth to
-% determine the amount of hanging indentation.
-%
-\@innernewdimen\biblabelwidth
-\@innernewdimen\biblabelextraspace
-%
-% Now come the main macros that are related to the printing of the
-% bibliography. Since you might want to redefine them, they are given
-% default definitions outside of \@readbblfile.
-%
-% The first one controls the printing of a bibliography entry's label.
-% If you change it, make sure that it starts with something like
-% \noindent or \indent or \leavevmode that puts TeX into horizontal mode
-% (even if the label itself is empty); otherwise, the hanging
-% indentation will get messed up in certain circumstances.
-%
-\def\biblabelprint#1{%
- \noindent
- \hbox to \biblabelwidth{%
- \biblabelprecontents
- \biblabelcontents{#1}%
- \biblabelpostcontents
- }%
- \kern\biblabelextraspace
-}%
-%
-% If you are using numeric labels, and you want them left-justified
-% (numeric labels by default are right-justified), do something like:
-% \def\biblabelprecontents{\relax}
-% \def\biblabelpostcontents{\hss}
-%
-% By default the labels are typeset in \bblrm, and enclosed in brackets.
-%
-\def\biblabelcontents#1{{\bblrm [#1]}}%
-%
-% The main text, too, is typeset using \bblrm, which is \rm by default.
-%
-\def\bblrm{\rm}%
-%
-% Emphasis for producing, e.g., titles, is done with \it by default.
-%
-\def\bblem{\it}%
-%
-% Some styles use a caps-and-small-caps font for author names. LaTeX
-% defines an \sc command but plain TeX doesn't, so we need one here.
-% The definition below doesn't load the font unless it's needed, but it
-% tries to load only the 10pt version, because it might not exist at
-% other point sizes.
-%
-\def\bblsc{\ifx\@scfont\@undefined
- \font\@scfont = cmcsc10
- \fi
- \@scfont
-}%
-%
-% The major parts of an entry are separated with \bblnewblock. The
-% numbers below are taken from LaTeX's `article' style.
-%
-\def\bblnewblock{\hskip .11em plus .33em minus .07em }%
-%
-% Here's where you stick any other bibliography-formatting goodies, or
-% redefine the values above.
-%
-\let\bblhook = \empty
-%
-%
-% Here are the four default definitions for formatting the in-text
-% citations. These are what you redefine (after your \input btxmac but
-% before your \bibliography) to get parens instead of brackets, or
-% superscripts, or footnotes, or whatever.
-%
-\def\printcitestart{[}% left bracket
-\def\printcitefinish{]}% right bracket
-\def\printbetweencitations{, }% comma, space
-\def\printcitenote#1{, #1}% comma, space, note (if it exists)
-%
-% That scheme is pretty flexible. For example you could use
-% \def\printcitestart{\unskip $^\bgroup}
-% \def\printcitefinish{\egroup$}
-% \def\printbetweencitations{,}
-% \def\printcitenote#1{\hbox{\sevenrm\space (#1)}}
-% \font\eighttt = cmtt8
-% \scriptfont\ttfam = \eighttt
-% to get superscripted in-text citations. (The scriptfont stuff
-% exists only to print an undefined citation; it's in cmtt8 because
-% there is no cmtt7.) To get something radically different, however,
-% you'll have to define your own \cite command.
-%
-% When we read `\citation' from the .aux file, it means nothing.
-%
-\let\citation = \@gobble
-%
-%
-% Now comes the stuff for dealing with LaTeX's \newcommand. As
-% mentioned earlier, this \newcommand will redefine a preexisting
-% command; that's different from how LaTeX's \newcommand behaves.
-%
-\@innernewcount\@numparams
-%
-% \newcommand{\foo}[n]{text} defines the control sequence \foo to have
-% n parameters, and replacement text `text'.
-%
-\def\newcommand#1{%
- \def\@commandname{#1}%
- \@getoptionalarg\@continuenewcommand
-}%
-%
-% Figure out if this definition has parameters.
-%
-\def\@continuenewcommand{%
- % If no optional argument, we have zero parameters. Otherwise, we
- % have that many.
- \@numparams = \ifx\@optionalarg\empty 0\else\@optionalarg \fi \relax
- \@newcommand
-}%
-%
-% \@numparams is how many arguments this command has. The name of the
-% command is \@commandname. The replacement text for the new macro is #1.
-%
-\def\@newcommand#1{%
- \def\@startdef{\expandafter\edef\@commandname}%
- \ifnum\@numparams=0
- \let\@paramdef = \empty
- \else
- \ifnum\@numparams>9
- \errmessage{\the\@numparams\space is too many parameters}%
- \else
- \ifnum\@numparams<0
- \errmessage{\the\@numparams\space is too few parameters}%
- \else
- \edef\@paramdef{%
- % This is disgusting, but \loop doesn't work inside \edef,
- % because \body isn't defined.
- \ifcase\@numparams
- \empty No arguments.
- \or ####1%
- \or ####1####2%
- \or ####1####2####3%
- \or ####1####2####3####4%
- \or ####1####2####3####4####5%
- \or ####1####2####3####4####5####6%
- \or ####1####2####3####4####5####6####7%
- \or ####1####2####3####4####5####6####7####8%
- \or ####1####2####3####4####5####6####7####8####9%
- \fi
- }%
- \fi
- \fi
- \fi
- \expandafter\@startdef\@paramdef{#1}%
-}%
-%
-%% [[[end of BibTeX-specific stuff]]]
-%
-%
-% Names of references (arguments given in the \cite and \nocite
-% commands) and file names (arguments given in the \bibliography and
-% \bibliographystyle commands) are recorded in \jobname.aux, called the
-% \@auxfile in these macros. Here's how they get read in.
-%
-\def\@readauxfile{%
- \if@auxfiledone \else % remember: \@auxfiledonetrue if \noauxfile is defined
- \global\@auxfiledonetrue
- \@testfileexistence{aux}%
- \if@fileexists
- \begingroup
- % Because we might be in horizontal mode when \@readauxfile
- % is called (if it's in response to a \cite or \nocite), we
- % want to ignore all the would-be spaces at the ends of
- % lines in the aux file. Fortunately, it's highly unlikely
- % an end-of-line might actually be desired.
- % And because we don't change the category code of anything
- % but @, primitives like \gdef can't be used to define labels
- % in the aux file. The solution adopted by btxmac.tex is to
- % write `\@citedef{LABEL}{DEFINITION}' to the aux file, and
- % use \csname on LABEL.
- \endlinechar = -1
- \catcode`@ = 11
- \input \jobname.aux
- \endgroup
- \else
- \message{\@undefinedmessage}%
- \global\@citewarningfalse
- \fi
- \immediate\openout\@auxfile = \jobname.aux
- \fi
-}%
-%
-% The \@readauxfile macro does all that work the first time it's called.
-% Since it's called once for every \cite, \nocite, \bibliography, and
-% \bibliographystyle command that the user issues, we need to remember
-% whether the work's been done. It's considered done if we're not to do
-% it---that is, if \noauxfile is defined.
-%
-\newif\if@auxfiledone
-\ifx\noauxfile\@undefined \else \@auxfiledonetrue\fi
-%
-% It's conceivable you'd want to change how other characters are read;
-% to do that, change their category code before doing \input btxmac.
-%
-%
-% After reading the .aux file, \@readauxfile opens it for writing.
-% The \@writeaux macro does the actual writing (as long as
-% \noauxfile is undefined).
-%
-\@innernewwrite\@auxfile
-\def\@writeaux#1{\ifx\noauxfile\@undefined \write\@auxfile{#1}\fi}%
-%
-%
-% A macro package that uses btxmac.tex might define
-% \@undefinedmessage (before doing an \input btxmac).
-%
-\ifx\@undefinedmessage\@undefined
- \def\@undefinedmessage{No .aux file; I won't give you warnings about
- undefined citations.}%
-\fi
-%
-% Even if citations are undefined, we want to complain only if
-% \@citewarningtrue. The default is to set \@citewarningtrue unless
-% \noauxfile is defined. Again, a macro package that uses
-% btxmac.tex might want to redefine this.
-%
-\@innernewif\if@citewarning
-\ifx\noauxfile\@undefined \@citewarningtrue\fi
-%
-%
-% Finally, before leaving we restore @'s old category code.
-%
-\catcode`@ = \@oldatcatcode