diff options
author | Karl Berry <karl@freefriends.org> | 2017-02-22 00:01:30 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2017-02-22 00:01:30 +0000 |
commit | 1553d537c63d2eef1b6fb7e7fcfc14fbb0d2e6f4 (patch) | |
tree | 8f92fc9628cbe401229268b1ca2f567590748899 /Build/source/texk/web2c/cwebdir/ctangle.w | |
parent | 216791a94d49b9c2142dcb14d7d7ff639b9e2e5b (diff) |
cweb 3.64b
git-svn-id: svn://tug.org/texlive/trunk@43294 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/cwebdir/ctangle.w')
-rw-r--r-- | Build/source/texk/web2c/cwebdir/ctangle.w | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/Build/source/texk/web2c/cwebdir/ctangle.w b/Build/source/texk/web2c/cwebdir/ctangle.w index 2b10a243a5b..130800210e5 100644 --- a/Build/source/texk/web2c/cwebdir/ctangle.w +++ b/Build/source/texk/web2c/cwebdir/ctangle.w @@ -1224,11 +1224,14 @@ file name. @<Insert the line...@>= store_two_bytes(0150000); -if (changing) id_first=change_file_name; -else id_first=cur_file_name; +if (changing && include_depth==change_depth) { /* correction made Feb 2017 */ + id_first=change_file_name; + store_two_bytes((sixteen_bits)change_line); +}@+else { + id_first=cur_file_name; + store_two_bytes((sixteen_bits)cur_line); +} id_loc=id_first+strlen(id_first); -if (changing) store_two_bytes((sixteen_bits)change_line); -else store_two_bytes((sixteen_bits)cur_line); {int a=id_lookup(id_first,id_loc,0)-name_dir; app_repl((a / 0400)+0200); app_repl(a % 0400);} |