diff options
Diffstat (limited to 'Build/source/texk/web2c/bibtex.ch')
| -rw-r--r-- | Build/source/texk/web2c/bibtex.ch | 24 |
1 files changed, 15 insertions, 9 deletions
diff --git a/Build/source/texk/web2c/bibtex.ch b/Build/source/texk/web2c/bibtex.ch index 7bda21d2b1a..b9661c65cdd 100644 --- a/Build/source/texk/web2c/bibtex.ch +++ b/Build/source/texk/web2c/bibtex.ch @@ -13,6 +13,12 @@ % 03/09/90 `int' is a bad variable name for C. % (more recent changes in the ChangeLog) +@x [0] +\def\(#1){} % this is used to make section names sort themselves better +@y +\def\({} % this is used to make section names sort themselves better +@z + % [0] Let bibtex.tex work with latest webmac (which defines \ET, hence % making E active loses). @x @@ -104,7 +110,7 @@ begin initialize; print_ln(banner);@/ @y -@<Define |parse_arguments|@> +@<Define \(|parse_arguments|@> begin standard_input := stdin; standard_output := stdout; @@ -1054,7 +1060,7 @@ if (last_cite = max_cites) then % [141] Don't pad with blanks, terminate with null. % Don't use a path to search for subsidiary aux files, % but do check the directory of the main .aux file. -% +% % This last is useful, for example, when --output-dir is used with TeX and the % .aux file has an \@input directive resulting from a LaTeX \include; % see bibtex-auxinclude.test. It's necessary because BibTeX itself does @@ -1065,7 +1071,7 @@ if (last_cite = max_cites) then % changing the add_extension function to look for those overrides to the % aux file dirname, so that when we call kpse_*_name_ok below, we're % calling it on the actual file that will be used. -% +% % And we need to call kpse_*_name_ok because bibtex is included in the % shell_escape_commands list that can be invoked by TeX in restricted mode. % @@ -1299,7 +1305,7 @@ while (single_ptr + wiz_def_ptr > wiz_fn_space) do @!cite_info : ^str_number; {extra |cite_list| info} @z -@x [224] Be silent unless verbose. +@x [223] Be silent unless verbose. print ('Database file #',bib_ptr+1:0,': '); print_bib_name;@/ @y @@ -1445,7 +1451,7 @@ entry_strs := XTALLOC ((num_ent_strs + 1) * (num_cites + 1) * (ent_str_size + 1) x_entry_strs(str_ent_ptr)(0) := end_of_string; @z -@x [291] Dynamic lit_stk_size. +@x [290] Dynamic lit_stk_size. @!lit_stack : array[lit_stk_loc] of integer; {the literal function stack} @!lit_stk_type : array[lit_stk_loc] of stk_type; {their corresponding types} @y @@ -1478,7 +1484,7 @@ entry_strs := XTALLOC ((num_ent_strs + 1) * (num_cites + 1) * (ent_str_size + 1) end; @z -@x [320] Dynamic buf_size. +@x [322] Dynamic buf_size. if (out_buf_length+(p_ptr2-p_ptr1) > buf_size) then overflow('output buffer size ',buf_size); @y @@ -1494,7 +1500,7 @@ while (out_buf_length+(p_ptr2-p_ptr1) > buf_size) do confusion ('field_info index is out of range'); @z -@x [330] Macroize entry_strs[][] +@x [329] Macroize entry_strs[][] while (entry_strs[str_ent_ptr][ex_buf_ptr] <> end_of_string) do {copy characters into the buffer} append_ex_buf_char (entry_strs[str_ent_ptr][ex_buf_ptr]); @@ -1622,7 +1628,7 @@ if (pop_lit2 >= cmd_str_ptr) then {no shifting---merely change pointers} @z % emacs-page -@x [468] System-dependent changes. +@x [467] System-dependent changes. This section should be replaced, if necessary, by changes to the program that are necessary to make \BibTeX\ work at a particular installation. It is usually best to design your change file so that all changes to @@ -1633,7 +1639,7 @@ itself will get a new section number. @y @d argument_is (#) == (strcmp (long_options[option_index].name, #) = 0) -@<Define |parse_arguments|@> = +@<Define \(|parse_arguments|@> = procedure parse_arguments; const n_options = 4; {Pascal won't count array lengths for us.} var @!long_options: array[0..n_options] of getopt_struct; |