From 95dd017534f572fb1cac4da9569fcef0d3f2beaf Mon Sep 17 00:00:00 2001 From: Andreas Scherer Date: Fri, 23 Aug 2024 12:27:21 +0000 Subject: [WEB] Fix a few spaces. Curiously, WEAVE adds spaces before a/o after certain PASCAL keywords, when they are used in |vertical bars| in TeX text or comments. The construct '\ignorespaces|...|\unskip' is used in several WEB sources, obviously for a long time. git-svn-id: svn://tug.org/texlive/trunk@72087 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/web2c/ChangeLog | 7 +++++++ Build/source/texk/web2c/gftopk.ch | 2 +- Build/source/texk/web2c/gftype.ch | 2 +- Build/source/texk/web2c/pktogf.ch | 2 +- Build/source/texk/web2c/pktype.ch | 4 ++-- 5 files changed, 12 insertions(+), 5 deletions(-) (limited to 'Build/source') diff --git a/Build/source/texk/web2c/ChangeLog b/Build/source/texk/web2c/ChangeLog index 0f6a9d9a3b7..ab0d6888111 100644 --- a/Build/source/texk/web2c/ChangeLog +++ b/Build/source/texk/web2c/ChangeLog @@ -1,3 +1,10 @@ +2024-08-23 Andreas Scherer + + * gftopk.ch, + * gftype.ch, + * pktogf.ch, + * pktype.ch: Fix a few spaces. + 2024-08-21 Andreas Scherer * weav-twill.ch: Prime the title page. diff --git a/Build/source/texk/web2c/gftopk.ch b/Build/source/texk/web2c/gftopk.ch index 1afa9119ef7..62af338db8e 100644 --- a/Build/source/texk/web2c/gftopk.ch +++ b/Build/source/texk/web2c/gftopk.ch @@ -82,7 +82,7 @@ begin @=final_end; @y @ This module is deleted, because it is only useful for -a non-local goto, which we can't use in C. +a non-local |goto|\unskip, which we can't use in C. @z @x [6] Dynamic allocation of |row| array. diff --git a/Build/source/texk/web2c/gftype.ch b/Build/source/texk/web2c/gftype.ch index 49d7bf6b3e0..2e51550240a 100644 --- a/Build/source/texk/web2c/gftype.ch +++ b/Build/source/texk/web2c/gftype.ch @@ -78,7 +78,7 @@ begin @=final_end; @y @ This module is deleted, because it is only useful for -a non-local goto, which we can't use in C. +a non-local |goto|\unskip, which we can't use in C. Instead, we define parameters settable at runtime. diff --git a/Build/source/texk/web2c/pktogf.ch b/Build/source/texk/web2c/pktogf.ch index bd468f2a9de..1dc768e46e0 100644 --- a/Build/source/texk/web2c/pktogf.ch +++ b/Build/source/texk/web2c/pktogf.ch @@ -79,7 +79,7 @@ begin @=final_end; @y @ This module is deleted, because it is only useful for -a non-local goto, which we don't use in C. +a non-local |goto|\unskip, which we don't use in C. @z % [6] Remove terminal_line_length, since there is no dialog, and diff --git a/Build/source/texk/web2c/pktype.ch b/Build/source/texk/web2c/pktype.ch index b5e64566529..df785ce8b26 100644 --- a/Build/source/texk/web2c/pktype.ch +++ b/Build/source/texk/web2c/pktype.ch @@ -65,7 +65,7 @@ begin @=final_end; @y @ This module is deleted, because it is only useful for -a non-local |goto|, which we don't use in C. +a non-local |goto|\unskip, which we don't use in C. @z % [6] No need for |name_length| or |terminal_line_length|. Since these @@ -89,7 +89,7 @@ to the very end of the program with an error message. begin goto final_end; end; @y -@ We use a call to the external C exit to avoid a non-local |goto|. +@ We use a call to the external C exit to avoid a non-local |goto|\unskip. @d abort(#)==begin print_ln(#); uexit(1) end -- cgit v1.2.3