summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c
diff options
context:
space:
mode:
authorAndreas Scherer <andreas_tex@freenet.de>2022-11-21 11:57:15 +0000
committerAndreas Scherer <andreas_tex@freenet.de>2022-11-21 11:57:15 +0000
commit13927ca9f1ec030f243b4ce025abd21c3cfd5477 (patch)
tree45304998fa80940be1aab21dad1f0421a7698d9c /Build/source/texk/web2c
parentd21d8428c8716c011e423661089d4f75a37ddf39 (diff)
[CWEB] Fix an issue with math macros.
See https://github.com/ascherer/cwebbin/issues/62 for details. git-svn-id: svn://tug.org/texlive/trunk@65064 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c')
-rw-r--r--Build/source/texk/web2c/cwebdir/ChangeLog5
-rw-r--r--Build/source/texk/web2c/cwebdir/ctwill-w2c.ch4
-rw-r--r--Build/source/texk/web2c/cwebdir/cweave.w6
3 files changed, 9 insertions, 6 deletions
diff --git a/Build/source/texk/web2c/cwebdir/ChangeLog b/Build/source/texk/web2c/cwebdir/ChangeLog
index 23200f88c01..84473e9c608 100644
--- a/Build/source/texk/web2c/cwebdir/ChangeLog
+++ b/Build/source/texk/web2c/cwebdir/ChangeLog
@@ -1,3 +1,8 @@
+2022-11-21 Andreas Scherer <https://ascherer.github.io>
+
+ * ctwill-w2c.ch,
+ * cweave.w: Fix an issue with math macros.
+
2022-08-21 Andreas Scherer <https://ascherer.github.io>
* ctang-w2c.ch,
diff --git a/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch b/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch
index 8f44b5dffd9..94c43c87c8b 100644
--- a/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch
+++ b/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch
@@ -1087,12 +1087,12 @@ flush_buffer(out_ptr,false,false);
@x
@.Improper macro definition@>
else {
- app_cur_id(false);
+ app('$'); app_cur_id(false);
@y
@.Improper macro definition@>
else {
id_being_defined=id_lookup(id_first,id_loc,normal);
- app_cur_id(false);
+ app('$'); app_cur_id(false);
def_diff=(*loc!='(');
@z
diff --git a/Build/source/texk/web2c/cwebdir/cweave.w b/Build/source/texk/web2c/cwebdir/cweave.w
index 7de3b4d1d9f..17cb9ae4b55 100644
--- a/Build/source/texk/web2c/cwebdir/cweave.w
+++ b/Build/source/texk/web2c/cwebdir/cweave.w
@@ -4350,9 +4350,8 @@ it starts after we scan the matching `\.)'.
err_print("! Improper macro definition");
@.Improper macro definition@>
else {
- app_cur_id(false);
+ app('$'); app_cur_id(false);
if (*loc=='(') {
- app('$');
reswitch: switch (next_control=get_next()) {
case '(': case ',': app(next_control); goto reswitch;
case identifier: app_cur_id(false); goto reswitch;
@@ -4364,10 +4363,9 @@ it starts after we scan the matching `\.)'.
} @=/* otherwise fall through */@>@;
default: err_print("! Improper macro definition"); break;
}
- app('$');
}
else next_control=get_next();
- app(break_space);
+ app_str("$ "); app(break_space);
app_scrap(dead,no_math); /* scrap won't take part in the parsing */
}
}