From 17a62a7784449c098bd7350b94b79c2d34d0a70f Mon Sep 17 00:00:00 2001 From: Andreas Scherer Date: Mon, 25 May 2020 15:11:03 +0000 Subject: [WEB2C] Spell checking of *.ch files. git-svn-id: svn://tug.org/texlive/trunk@55270 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/web2c/ChangeLog | 7 +++++++ Build/source/texk/web2c/bibtex.ch | 2 +- Build/source/texk/web2c/mft.ch | 6 +++--- Build/source/texk/web2c/tangle.ch | 8 ++++---- Build/source/texk/web2c/weave.ch | 2 +- 5 files changed, 16 insertions(+), 9 deletions(-) (limited to 'Build/source/texk/web2c') diff --git a/Build/source/texk/web2c/ChangeLog b/Build/source/texk/web2c/ChangeLog index c20c7703313..33ed8a4e005 100644 --- a/Build/source/texk/web2c/ChangeLog +++ b/Build/source/texk/web2c/ChangeLog @@ -1,3 +1,10 @@ +2020-05-25 Andreas Scherer + + * bibtex.ch, + * mft.ch, + * tangle.ch, + * weave.ch: Spell checking with 'aspell -l en_US'. + 2020-05-24 Andreas Scherer * dvicopy.web, diff --git a/Build/source/texk/web2c/bibtex.ch b/Build/source/texk/web2c/bibtex.ch index 280e9f66f68..977769c6f94 100644 --- a/Build/source/texk/web2c/bibtex.ch +++ b/Build/source/texk/web2c/bibtex.ch @@ -1029,7 +1029,7 @@ if (last_cite = max_cites) then while (last_cite < max_cites) do begin type_list[last_cite] := empty;@/ - cite_info[last_cite] := any_value; {to appeas \PASCAL's boolean evaluation} + cite_info[last_cite] := any_value; {to appease \PASCAL's boolean evaluation} incr(last_cite); end; @z diff --git a/Build/source/texk/web2c/mft.ch b/Build/source/texk/web2c/mft.ch index acbb6981f82..e19f61c039f 100644 --- a/Build/source/texk/web2c/mft.ch +++ b/Build/source/texk/web2c/mft.ch @@ -295,9 +295,9 @@ end % Now follows the simplest change -- although the bigest one. % The primitives of \MF\ and \MP\ are reshuffled into % three categories: -% -- primitivies common for \MF\ and \MP -% -- primitivies specific for \MF -% -- primitivies specific for \MP +% -- primitives common for \MF\ and \MP +% -- primitives specific for \MF +% -- primitives specific for \MP @x [65] @ The intended use of the macros above might not be immediately obvious, diff --git a/Build/source/texk/web2c/tangle.ch b/Build/source/texk/web2c/tangle.ch index 5331307af30..6f3bb6bd417 100644 --- a/Build/source/texk/web2c/tangle.ch +++ b/Build/source/texk/web2c/tangle.ch @@ -242,7 +242,7 @@ the replacement text. @d parametric2=4 {second type of parametric macros have this |ilk|} @z -@x [50] unambig_length is a variabe now +@x [50] unambig_length is a variable now @!chopped_id:array [0..unambig_length] of ASCII_code; {chopped identifier} @y @!chopped_id:array [0..max_id_length] of ASCII_code; {chopped identifier} @@ -787,7 +787,7 @@ long_options[current_option].flag := 0; long_options[current_option].val := 0; incr (current_option); -@ Strict comparisions. +@ Strict comparisons. @.-strict@> @ = @@ -797,7 +797,7 @@ long_options[current_option].flag := 0; long_options[current_option].val := 0; incr (current_option); -@ Loose comparisions. +@ Loose comparisons. @.-loose@> @ = @@ -807,7 +807,7 @@ long_options[current_option].flag := 0; long_options[current_option].val := 0; incr (current_option); -@ Loose comparisions. +@ Loose comparisons. @.-length@> @ = diff --git a/Build/source/texk/web2c/weave.ch b/Build/source/texk/web2c/weave.ch index c1530e6cfb2..cf5435e873f 100644 --- a/Build/source/texk/web2c/weave.ch +++ b/Build/source/texk/web2c/weave.ch @@ -254,7 +254,7 @@ var q:xref_number; {pointer to previous cross reference} begin if (reserved(p)or(byte_start[p]+1=byte_start[p+ww]))and @y If the user has sent the |no_xref| flag (the -x option of the command line), -then it is unnecessary to keep track of cross references for identifers. +then it is unnecessary to keep track of cross references for identifiers. If one were careful, one could probably make more changes around module 100 to avoid a lot of identifier looking up. -- cgit v1.2.3