summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c
diff options
context:
space:
mode:
authorAkira Kakuto <kakuto@fuk.kindai.ac.jp>2014-07-04 01:29:36 +0000
committerAkira Kakuto <kakuto@fuk.kindai.ac.jp>2014-07-04 01:29:36 +0000
commitee740299c6d3205619c632d190071c959bab3ba6 (patch)
treec2b0114ddcc3dd1b5902a3b6fee2de9a7ef2533f /Build/source/texk/web2c
parent50a24426b7eb74df9f6a296d8e88d1d7608acbd0 (diff)
Remove unused variables
git-svn-id: svn://tug.org/texlive/trunk@34513 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c')
-rw-r--r--Build/source/texk/web2c/xetexdir/ChangeLog6
-rw-r--r--Build/source/texk/web2c/xetexdir/xetex.web4
2 files changed, 8 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/xetexdir/ChangeLog b/Build/source/texk/web2c/xetexdir/ChangeLog
index 78fb59b7834..90692b0e52c 100644
--- a/Build/source/texk/web2c/xetexdir/ChangeLog
+++ b/Build/source/texk/web2c/xetexdir/ChangeLog
@@ -1,3 +1,9 @@
+2014-06-04 Akira Kakuto <kakuto@fuk.kindai.ac.jp>
+
+ * xetex.web: Remove unused variables k,and l from function
+ get_strings_started, and q, and r from procedure
+ set_math_char().
+
2014-05-10 Akira Kakuto <kakuto@fuk.kindai.ac.jp>
* image/bmpimage.c: Error exit instead of crashing for unsupported
diff --git a/Build/source/texk/web2c/xetexdir/xetex.web b/Build/source/texk/web2c/xetexdir/xetex.web
index 6632640461b..3961b732f58 100644
--- a/Build/source/texk/web2c/xetexdir/xetex.web
+++ b/Build/source/texk/web2c/xetexdir/xetex.web
@@ -1407,7 +1407,7 @@ on the information that \.{WEB} has output while processing \TeX.
@p @!init function get_strings_started:boolean; {initializes the string pool,
but returns |false| if something goes wrong}
label done,exit;
-var k,@!l:0..255; {small indices or counters}
+var
@!m,@!n:text_char; {characters input from |pool_file|}
@!g:str_number; {garbage}
@!a:integer; {accumulator for check sum}
@@ -25575,7 +25575,7 @@ nothing is appended.
@<Declare act...@>=
procedure set_math_char(@!c:integer);
-var p,q,r:pointer; {the new noad}
+var p:pointer; {the new noad}
ch: UnicodeScalar;
begin if is_active_math_char(c) then
@<Treat |cur_chr|...@>