diff options
| author | Peter Breitenlohner <peb@mppmu.mpg.de> | 2009-11-10 10:27:09 +0000 |
|---|---|---|
| committer | Peter Breitenlohner <peb@mppmu.mpg.de> | 2009-11-10 10:27:09 +0000 |
| commit | 5e8e9500102800e68c9e7fcac9e85c1668b71a36 (patch) | |
| tree | 81d79ac70ffbb127e8063f18c8f55475ca169ee1 /Build/source/texk/web2c/mf-binpool.ch | |
| parent | e6a9c88ada2f11dd61e4c4e39dff84944bed5787 (diff) | |
towards TL2010: texk/web2c
git-svn-id: svn://tug.org/texlive/trunk@15964 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/mf-binpool.ch')
| -rw-r--r-- | Build/source/texk/web2c/mf-binpool.ch | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/mf-binpool.ch b/Build/source/texk/web2c/mf-binpool.ch index f9a2f29ac4d..b9dea85b85e 100644 --- a/Build/source/texk/web2c/mf-binpool.ch +++ b/Build/source/texk/web2c/mf-binpool.ch @@ -2,6 +2,14 @@ % pool in binary % @x +@!m,@!n:text_char; {characters input from |pool_file|} +@!g:str_number; {garbage} +@!a:integer; {accumulator for check sum} +@!c:boolean; {check sum has been checked} +@y +@!g:str_number; {garbage} +@z +@x @ @d bad_pool(#)==begin wake_up_terminal; write_ln(term_out,#); a_close(pool_file); get_strings_started:=false; return; end |