[subversion-commit] SVN tetex-bin commit + diffs: r1532 - in tetex-bin/branches/pdftex-1.4/texk/web2c: pdfetexdir pdftexdir pdfxtexdir

Frank Küster frank at costa.debian.org
Wed Jul 26 16:30:56 UTC 2006


Author: frank
Date: 2006-07-26 16:30:55 +0000 (Wed, 26 Jul 2006)
New Revision: 1532

Removed:
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/ChangeLog
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/Makefile.in
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.ch1
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.ch2
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.defines
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.h
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.mak
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.mk
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetexextra.in
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/tex.ch0
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/tex.ch1
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/tex.ch2
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/TODO
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/hz.ch
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/misc.ch
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/pdftex-syntax.txt
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/pdftex.mak
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/tex.ch1
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/tex.ch2
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/tex.pch
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/vadjust.ch
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/win32.mak
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/ChangeLog
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/Makefile.in
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/colorspace.ch
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/escapestr.ch
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/fixlinedimen.ch
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/null.ch
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.ch2
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.defines
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.h
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.mak
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.mk
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtexextra.in
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pxdimen.ch
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/quitvmode.ch
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/strcmp.ch
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tagcode.ch
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tex.ch0
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tex.ch1
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tex.ch2
   tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/vadjust.ch
Log:
remove files no longer in new upstream version (no directories pdfetexdir, pdfxtexdir; no change files based on tex.web) 

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/ChangeLog
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/ChangeLog	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/ChangeLog	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,69 +0,0 @@
-2004-08-21  Peter Breitenlohner <peb at mppmu.mpg.de>
-
-	* pdfetex.ch2: Adapted to e-TeX version 2.2.
-
-2004-08-26  Olaf Weber  <olaf at infovore.xs4all.nl>
-
-	* pdfetexextra.in: File was renamed from pdftexextra.h; the
-	current pdfTeX and e-TeX versions are substituted from
-	../pdftexdir/pdftex.version and ../etexdir/etex.version.  Variant
-	of code supplied by Peter Breitenlohner <peb at mppmu.mpg.de>.
-
-	* pdfetex.mk: Added rule to insert pdfTeX and e-TeX versions into
-	pdfetexextra.h.  Variant of code supplied by Peter Breitenlohner
-	<peb at mppmu.mpg.de>.
-
-2004-08-25  Olaf Weber  <olaf at infovore.xs4all.nl>
-
-	* pdfetex.mk: vadjust.ch moved from pdfxtexdir to pdftexdir.
-
-2004-08-17  Olaf Weber  <olaf at infovore.xs4all.nl>
-
-	* pdfetex.mk: Resurrected etex.fix, there is again a need to
-	include late-breaking changes.
-
-2004-07-29  Peter Breitenlohner <peb at mppmu.mpg.de>
-
-	* pdfetex.ch[12]: Somewhat rearrange handling of kern and math
-	nodes in order to reduce interference between eTeX and pdfTeX
-	change files.
-
-	* pdfetex.ch1 (hlist_out): Keep full mixed direction typesetting
-	code.
-
-2004-07-25  Peter Breitenlohner <peb at mppmu.mpg.de>
-
-	* pdfetex.ch[12]: Reorganize additional command codes for convert
-	and last_item in order to reduce interference between eTeX and
-	pdfTeX change files.
-
-2004-07-23  Peter Breitenlohner <peb at mppmu.mpg.de>
-
-	* pdfetex.ch[12], tex.ch[01]: Reorganize handling of banner
-	string in order to reduce interference between eTeX, pdfTeX,
-	and web2c change files.
-
-2004-07-22  Peter Breitenlohner <peb at mppmu.mpg.de>
-
-	* pdfetex.ch[12]: Removed unused token types for pdfTeX's
-	additional token list parameters.
-
-2004-07-19  Peter Breitenlohner <peb at mppmu.mpg.de>
-
-	* pdfetex.ch[12], tex.ch0: Reorganize handling of additional
-	token list and integer parameters and e-TeX's additional
-	penalties in order to reduce interference between eTeX, pdfTeX,
-	and web2c change files.
-
-	* pdfetex.mk (pdfetex.ch): Remove tex.ch2 from build rules.
-
-	* tex.ch2: Removed.
-
-2004-07-17  Peter Breitenlohner <peb at mppmu.mpg.de>
-
-	* pdfetex.mk: Rewrite build rules for pdfetex.{web,ch},
-	remove etex.{ch0,ch1,fix}, tex.ch2, and several non-dependencies.
-
-	* pdfetex.ch2: Adapt to eTeX changes.
-
-	* ChangeLog: New file.

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/Makefile.in
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/Makefile.in	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/Makefile.in	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,3 +0,0 @@
-mostlyclean clean:
-distclean maintainer-clean extraclean: clean
-	rm -f Makefile

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.ch1
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.ch1	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.ch1	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,82 +0,0 @@
-%
-% Copyright (c) 1996-2002 Han The Thanh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: //depot/Build/source.development/TeX/texk/web2c/pdfetexdir/pdfetex.ch1#9 $
-%
- at x [1.2] l.188
- at d TeX_banner=='This is TeX, Version 3.141592' {printed when \TeX\ starts}
-@#
- at d banner==eTeX_banner
- at y
- at d banner=='This is TeX, Version 3.141592' {printed when \TeX\ starts}
- at z
-
- at x [17.230] l.4727 - first pdfTeX, then e-TeX additional token list parameters
- at d tex_toks=local_base+10 {end of \TeX's token list parameters}
- at y
- at d toks_base=local_base+10 {table of 256 token list registers}
- at z
-
- at x [17.236] l.4960 - first pdfTeX, then e-TeX additional integer parameters
- at d tex_int_pars=55 {total number of \TeX's integer parameters}
- at y
- at d int_pars=55 {total number of integer parameters}
- at z
-
- at x [26.416] l.8400- first pdfTeX, then e-TeX additional command codes
- at d badness_code=input_line_no_code+1 {code for \.{\\badness}}
-@#
- at d eTeX_int=badness_code+1 {first of \eTeX\ codes for integers}
- at y
- at d badness_code=glue_val+2 {code for \.{\\badness}}
-@#
- at d eTeX_int=pdftex_last_item_codes+1 {first of \eTeX\ codes for integers}
- at z
-
- at x [26.424] l.8506
-if m>=input_line_no_code then
- at y
-if cur_chr>glue_val then
- at z
-
- at x [26.424] l.8507
-  input_line_no_code: cur_val:=line;
-  badness_code: cur_val:=last_badness;
- at y
-  begin if cur_chr=input_line_no_code then cur_val:=line
-  else cur_val:=last_badness; {|cur_chr=badness_code|}
- at z
-
- at x [27.468] l.9207 - first e-TeX, then pdfTeX additional command codes
- at d job_name_code=etex_convert_codes {command code for \.{\\jobname}}
- at y
- at d job_name_code=5 {command code for \.{\\jobname}}
- at z
-
- at x [649]
-hpack:=r;
- at y
-exit: hpack:=r;
- at z
-
- at x [33.651] l.12936
-  kern_node: x:=x+width(p);
- at y
-  kern_node,math_node: x:=x+width(p);
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.ch2
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.ch2	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.ch2	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,217 +0,0 @@
-%
-% Copyright (c) 1996-2002 Han The Thanh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: //depot/Build/source.development/TeX/texk/web2c/pdfetexdir/pdfetex.ch2#18 $
-%
- at x limbo
-\def\pdfTeX{pdf\TeX}
- at y
-\def\pdfTeX{pdf\TeX}
-\def\pdfeTeX{pdf\eTeX}
- at z
-
- at x [1.2] l.188
- at d pdfTeX_banner=='This is pdfTeX, Version 3.141592',pdftex_version_string
- at y
- at d pdfeTeX_banner=='This is pdfeTeX, Version 3.141592',pdftex_version_string,eTeX_version_string
-   {printed when \pdfeTeX\ starts}
-@#
- at d pdfTeX_banner=='This is pdfTeX, Version 3.141592',pdftex_version_string
- at z
-
- at x [1.2] l.188
- at d banner==pdfTeX_banner
- at y
- at d banner==pdfeTeX_banner
- at z
-
- at x [17.230] l.4727 - first pdfTeX, then e-TeX additional token list parameters
- at d toks_base=pdf_toks {table of 256 token list registers}
-@#
- at d etex_toks_base=tex_toks {base for \eTeX's token list parameters}
- at y
- at d etex_toks_base=pdf_toks {base for \eTeX's token list parameters}
- at z
-
- at x [17.236] l.4960 - first pdfTeX, then e-TeX additional integer parameters
- at d int_pars=pdf_int_pars {total number of integer parameters}
-@#
- at d etex_int_base=tex_int_pars {base for \eTeX's integer parameters}
- at y
- at d etex_int_base=pdf_int_pars {base for \eTeX's integer parameters}
- at z
-
- at x [26.424] l.8507
- else begin case m of
-  begin case m of
- at y
- else begin case m of
- at z
-
- at x [26.424] l.8507
-  end; {there are no other cases}
- at y
- at z
-
- at x [27.468] l.9207 - first e-TeX, then pdfTeX additional command codes
- at d pdftex_first_expand_code = 5 {base for \pdfTeX's command codes}
- at y
- at d pdftex_first_expand_code = etex_convert_codes {base for \pdfTeX's command codes}
- at z
-
- at x [32f]
-@!edge:scaled; {left edge of sub-box, or right edge of leader space}
- at y
-@!edge:scaled; {right edge of sub-box or leader space}
-@!prev_p:pointer; {one step behind |p|}
- at z
-
- at x [32f]
-base_line:=cur_v; left_edge:=cur_h;
- at y
-base_line:=cur_v;
-prev_p:=this_box+list_offset;
-@<Initialize |hlist_out| for mixed...@>;
-left_edge:=cur_h;
- at z
-
- at x [32f]
-decr(cur_s);
- at y
-@<Finish |hlist_out| for mixed...@>;
-decr(cur_s);
- at z
-
- at x [32f]
-  p:=link(p);
- at y
-  prev_p:=link(prev_p); {N.B.: not |prev_p:=p|, |p| might be |lig_trick|}
-  p:=link(p);
- at z
-
- at x [32f]
-kern_node,math_node:cur_h:=cur_h+width(p);
- at y
-kern_node:cur_h:=cur_h+width(p);
-math_node: @<Handle a math node in |hlist_out|@>;
- at z
-
- at x [32f]
-othercases do_nothing
- at y
-@/@<Cases of |hlist_out| that arise in mixed direction text only@>@;
-othercases do_nothing
- at z
-
- at x [32f]
-next_p:p:=link(p);
- at y
-next_p:prev_p:=p; p:=link(p);
- at z
-
- at x [32f]
-  temp_ptr:=p; edge:=cur_h;
- at y
-  temp_ptr:=p; edge:=cur_h+width(p);
-  if cur_dir=right_to_left then cur_h:=edge;
- at z
-
- at x [32f]
-  cur_h:=edge+width(p); cur_v:=base_line;
- at y
-  cur_h:=edge; cur_v:=base_line;
- at z
-
- at x [32f]
-rule_wd:=rule_wd+cur_g;
- at y
-rule_wd:=rule_wd+cur_g;
-if eTeX_ex then @<Handle a glue node for mixed...@>;
- at z
-
- at x [32f]
-  edge:=cur_h+rule_wd; lx:=0;
- at y
-  if cur_dir=right_to_left then cur_h:=cur_h-10;
-  edge:=cur_h+rule_wd; lx:=0;
- at z
-
- at x [32f]
-  cur_h:=edge-10; goto next_p;
- at y
-  if cur_dir=right_to_left then cur_h:=edge
-  else cur_h:=edge-10;
-  goto next_p;
- at z
-
- at x [32f]
-save_h:=cur_h; temp_ptr:=leader_box;
- at y
-save_h:=cur_h; temp_ptr:=leader_box;
-if cur_dir=right_to_left then cur_h:=cur_h+leader_wd;
- at z
-
- at x [32f]
-  cur_h:=left_edge+shift_amount(p); {shift the box right}
- at y
-  if cur_dir=right_to_left then cur_h:=left_edge-shift_amount(p)
-  else cur_h:=left_edge+shift_amount(p); {shift the box right}
- at z
-
- at x [32f]
-if (rule_ht>0)and(rule_wd>0) then {we don't output empty rules}
-  pdf_set_rule(cur_h, cur_v, rule_wd, rule_ht);
- at y
-if (rule_ht>0)and(rule_wd>0) then {we don't output empty rules}
-  begin if cur_dir=right_to_left then cur_h:=cur_h-rule_wd;
-  pdf_set_rule(cur_h, cur_v, rule_wd, rule_ht);
-  cur_h:=left_edge;
-  end;
- at z
-
- at x [32f]
-begin cur_h:=left_edge+shift_amount(leader_box);@/
- at y
-begin if cur_dir=right_to_left then
-  cur_h:=left_edge-shift_amount(leader_box)
-  else cur_h:=left_edge+shift_amount(leader_box);
- at z
-
- at x [32f]
-@<(\pdfTeX) Ship box |p| out@>;
- at y
-@<(\pdfTeX) Ship box |p| out@>;
-if eTeX_ex then @<Check for LR anomalies at the end of |ship_out|@>;
- at z
-
- at x
-pdf_print("/Producer (pdfTeX-");
- at y
-pdf_print("/Producer (pdfeTeX-");
- at z
-
- at x [33.649] l.12912
-exit: {|hpack|}
- at y
- at z
-
- at x [33.651] l.12936
-  math_node: x:=x+width(p);
- at y
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.defines
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.defines	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.defines	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,92 +0,0 @@
-{
-Copyright (c) 1996-2002 Han The Thanh, <thanh at pdftex.org>
-
-This file is part of pdfTeX.
-
-pdfTeX is free software; you can redistribute it and/or modify
-it under the terms of the GNU General Public License as published by
-the Free Software Foundation; either version 2 of the License, or
-(at your option) any later version.
-
-pdfTeX is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-GNU General Public License for more details.
-
-You should have received a copy of the GNU General Public License
-along with pdfTeX; if not, write to the Free Software
-Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-
-$Id: //depot/Build/source.development/TeX/texk/web2c/pdfetexdir/pdfetex.defines#11 $
-}
-
-{ pdftex.defines: additions for pdfTeX }
-
-{ macros from pdftex.h }
- at define function pdfcharmarked();
- at define function getlpcode();
- at define function getrpcode();
- at define function getefcode();
- at define function texbopenin();
- at define function vfbopenin ();
- at define procedure pdfmarkchar();
- at define procedure writepdf();
-
-{ functions from mapfile.c }
- at define function hasfmentry();
- at define function tfmoffm();
- at define procedure checkextfm();
- at define procedure pdfmapfile();
- at define procedure pdfmapline();
- at define procedure pdfinitmapfile();
-
-{ functions from utils.c }
- at define function getresnameprefix;
- at define procedure setjobid();
- at define procedure makepdftexbanner;
- at define function extxnoverd();
- at define procedure libpdffinish;
- at define procedure writestreamlength();
- at define procedure printID();
- at define procedure printcreationdate;
-
-{ functions from vfpacket.c }
- at define function newvfpacket();
- at define function packetbyte;
- at define procedure startpacket();
- at define procedure storepacket();
-
-{ functions from writeenc.c }
- at define procedure setcharmap();
-
-{ functions from writefont.c }
- at define procedure dopdffont();
-
-{ functions from writeimg.c }
- at define function checkimageb();
- at define function checkimagec();
- at define function checkimagei();
- at define function epdforigx();
- at define function epdforigy();
- at define function imageheight();
- at define function imagepages();
- at define function imagewidth();
- at define function imagexres();
- at define function imageyres();
- at define function ispdfimage();
- at define function readimage();
- at define procedure deleteimage();
- at define procedure updateimageprocset();
- at define procedure writeimage();
-
-{ functions from writet3.c }
- at define function getpkcharwidth();
-
-{ functions from writezip.c }
- at define procedure writezip();
-
-{ functions from avlstuff.c }
- at define procedure avlputobj();
- at define function avlfindobj();
-
-{ end of pdftex.defines }

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.h
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.h	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.h	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,50 +0,0 @@
-/*
-Copyright (c) 1996-2002 Han The Thanh, <thanh at pdftex.org>
-
-This file is part of pdfTeX.
-
-pdfTeX is free software; you can redistribute it and/or modify
-it under the terms of the GNU General Public License as published by
-the Free Software Foundation; either version 2 of the License, or
-(at your option) any later version.
-
-pdfTeX is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-GNU General Public License for more details.
-
-You should have received a copy of the GNU General Public License
-along with pdfTeX; if not, write to the Free Software
-Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-
-$Id: //depot/Build/source.development/TeX/texk/web2c/pdfetexdir/pdfetex.h#4 $
-*/
-
-/* Additions to texmfmp.h for pdfTeX */
-
-/* mark a char in font */
-#define pdfmarkchar(f, c) pdfcharused[f][c/8] |= (1<<(c%8))
-
-/* test whether a char in font is marked */
-#define pdfcharmarked(f, c) (boolean)(pdfcharused[f][c/8] & (1<<(c%8)))
-
-/* writepdf() always writes by fwrite() */
-#define       writepdf(a, b) \
-  (void) fwrite ((char *) &pdfbuf[a], sizeof (pdfbuf[a]), \
-                 (int) ((b) - (a) + 1), pdffile)
-
-#define getlpcode(f, c) \
-    (pdffontlpbase[f] == 0 ? 0 : pdfmem[pdffontlpbase[f] + c])
-
-#define getrpcode(f, c) \
-    (pdffontrpbase[f] == 0 ? 0 : pdfmem[pdffontrpbase[f] + c])
-
-#define getefcode(f, c) \
-    (pdffontefbase[f] == 0 ? 1000 : pdfmem[pdffontefbase[f] + c])
-
-#define texbopenin(f) \
-    open_input (&(f), kpse_tex_format, FOPEN_RBIN_MODE)
-#define vfbopenin(f) \
-    open_input (&(f), kpse_vf_format, FOPEN_RBIN_MODE)
-
-#include <pdftexdir/ptexlib.h>

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.mak
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.mak	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.mak	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,164 +0,0 @@
-################################################################################
-#
-# Makefile  : pdfeTeX, web2c win32.mak makefile fragment to build pdfe-TeX
-# Author    : Fabrice Popineau <Fabrice.Popineau at supelec.fr>
-# Platform  : Win32, Microsoft VC++ 6.0, depends upon fpTeX 0.5 sources
-# Time-stamp: <04/03/20 17:02:03 popineau>
-#
-################################################################################
-
-Makefile: $(srcdir)\pdfetexdir\pdfetex.mak
-
-# We build pdfetex
-pdfetex = $(objdir)\pdfetex.exe
-!ifdef TEX_DLL
-pdfetex = $(pdfetex) $(objdir)\$(library_prefix)pdfetex.dll
-!endif
-
-# The C sources.
-pdfetex_c = pdfetex.c
-pdfetex_o = $(objdir)\pdfetex.obj
-
-!ifdef TEX_DLL
-$(objdir)\$(library_prefix)pdfetex.exp: $(objdir)\$(library_prefix)pdfetex.lib
-
-$(objdir)\$(library_prefix)pdfetex.lib: $(pdfetex_o)
-	$(archive) /DEF $(pdfetex_o)
-
-$(objdir)\$(library_prefix)pdfetex.dll: $(pdfetex_o) $(objdir)\$(library_prefix)pdfetex.exp $(objdir)\pdfetex.res $(pdftexlibs) $(kpathsealib) $(proglib)
-	$(link_dll) $(**) $(socketlibs) $(conlibs)
-
-$(objdir)\pdfetex.exe: $(objdir)\win32main.obj $(objdir)\$(library_prefix)pdfetex.lib $(proglib)
-	$(link) $(**) $(conlibs)
-!else
-$(objdir)\pdfetex.exe: $(pdfetex_o) $(objdir)\win32main.obj $(objdir)\pdfetex.res $(pdftexlibs) $(kpathsealib) $(proglib)
-	$(link) $(**) $(socketlibs) $(conlibs)
-!endif
-
-pdfetex: $(pdfetex)
-
-# C file dependencies.
-$(pdfetex_c) pdfetexcoerce.h pdfetexd.h: pdfetex.p $(web2c_texmf)
-	$(web2c) pdfetex
-
-# Tangling
-pdfetex.p pdfetex.pool: $(objdir)\tangle.exe pdfetex.web pdfetex.ch
-	.\$(objdir)\tangle pdfetex.web pdfetex.ch
-
-pdfetex_files = \
-	 etexdir\etex.ch0 \
-	 etexdir\etex.ch \
-	 etexdir\etex.fix \
-	 etexdir\etex.ch1 \
-         pdfetexdir\pdfetex.ch1 \
-         pdftexdir\pdftex.ch \
-         pdftexdir/hz.ch \
-         pdftexdir/misc.ch \
-         pdfetexdir\pdfetex.ch2
-
-pdfetex_changefiles = \
-	    pdfetexdir\tex.ch0 \
-	    tex.ch \
-	    tex-supp-w32.ch \
-	    etexdir\tex.ch1 \
-	    etexdir\tex.ech \
-	    etexdir\tex.ch2 \
-	    pdfetexdir\tex.ch1 \
-	    pdftexdir\tex.pch \
-	    pdfetexdir\tex.ch2 \
-#	    pdfetexdir\tex.ch3
-
-# Generation of the web and ch files.
-pdfetex.web: $(objdir)\tie.exe tex.web $(pdfetex_files) \
-	pdfetexdir\pdfetex.h pdfetexdir\pdfetex.defines # pdfetexdir\pdfetex.mak
-	.\$(objdir)\tie -m pdfetex.web tex.web $(pdfetex_files)
-
-pdfetex.ch: $(objdir)\tie.exe pdfetex.web $(pdfetex_changefiles) # pdfetexdir/pdfetex.mak
-	.\$(objdir)\tie -c pdfetex.ch pdfetex.web $(pdfetex_changefiles)
-
-pdfetexdir\pdfetex.h: pdftexdir\pdftex.h
-	-@$(del) $(@) $(redir_stderr)
-	$(copy) $(**) $(@)
-
-pdfetexdir\pdfetex.defines: pdftexdir\pdftex.defines
-	-@$(del) $(@) $(redir_stderr)
-	$(copy) $(**) $(@)
-
-check: pdfetex-check
-pdfetex-check: pdfetex pdfetex.efmt
-
-clean:: pdfetex-clean
-pdfetex-clean:
-#	$(LIBTOOL) --mode=clean $(RM) pdfetex
-	- at echo $(verbose) & ( \
-		for %%i in ($(pdfetex_o) $(pdfetex_c) pdfetexextra.c pdfetexcoerce.h \
-			    pdfetexd.h pdfetex.p pdfetex.pool pdfetex.web pdfetex.ch \
-			    pdfetex.efmt pdfetex.log) do $(del) %%i $(redir_stderr) \
-	)
-
-# Dumps
-# all_pdfefmts = pdfetex.efmt $(pdfefmts)
-# pdfefmts: $(all_pdfefmts)
-
-# pdfetex.efmt: $(pdfetex)
-# 	$(dumpenv) $(make) progname=pdfetex files="etex.src plain.tex cmr10.tfm" prereq-check
-# 	$(dumpenv) ./pdfetex --progname=pdfetex --jobname=pdfetex --ini "*\pdfoutput=1\input etex.src \dump" <nul
-# 
-# pdfelatex.efmt: $(pdfetex)
-# 	$(dumpenv) $(make) progname=pdfelatex files="latex.ltx" prereq-check
-# 	$(dumpenv) ./pdfetex --progname=pdfelatex --jobname=pdfelatex --ini "*\pdfoutput=1\input latex.ltx" <nul
-# 
-# pdflatex.efmt: $(pdfetex)
-# 	$(dumpenv) $(make) progname=pdflatex files="latex.ltx" prereq-check
-# 	$(dumpenv) ./pdfetex --progname=pdflatex --jobname=pdflatex --ini "*\pdfoutput=1\input latex.ltx" <nul
-
-# 
-# Installation.
-install-pdfetex: install-pdfetex-exec install-pdfetex-data
-install-pdfetex-exec: install-pdfetex-links
-# install-pdfetex-data: install-pdfetex-dumps
-install-pdfetex-dumps: install-pdfetex-fmts
-
-# The actual binary executables and pool files.
-install-programs: install-pdfetex-programs
-install-pdfetex-programs: $(pdfetex) $(bindir)
-	- at echo $(verbose) & ( \
-	  for %%p in ($(pdfetex)) do $(copy) %%p $(bindir) \
-	) $(redir_stdout)
-
-# install-links: install-pdfetex-links
-install-pdfetex-links: install-pdfetex-programs
-# 	- at echo $(verbose) & ( \
-# 	  pushd $(bindir) & \
-# 	    $(del) .\pdfeinitex.exe .\pdfevirtex.exe & \
-# 	    $(lnexe) .\pdfetex.exe $(bindir)\pdfeinitex.exe & \
-# 	    $(lnexe) .\pdfetex.exe $(bindir)\pdfevirtex.exe & \
-# 	  popd \
-# 	) $(redir_stdout)
-	- at echo $(verbose) & ( \
-	  if not "$(pdfefmts)"=="" \
-	    for %%i in ($(pdfefmts)) do \
-              pushd $(bindir) & \
-                $(del) .\%%~ni.exe & \
-	        $(lnexe) .\pdfetex.exe $(bindir)\%%~ni.exe & \
-	      popd \
-	) $(redir_stdout)
-
-# install-fmts: install-pdfetex-fmts
-install-pdfetex-fmts: pdfefmts $(fmtdir)
-	- at echo $(verbose) & ( \
-	  for %%f in ($(all_pdfefmts)) \
-	    do $(copy) %%f $(fmtdir)\%%f \
-	) $(redir_stdout)
-
-# Auxiliary files.
-install-data:: install-pdfetex-data
-install-pdfetex-data: $(texpooldir)
-	@$(copy) pdfetex.pool $(texpooldir)\pdfetex.pool $(redir_stdout)
-
-# end of pdfetex.mak
-#  
-# Local variables:
-# page-delimiter: "^# \f"
-# mode: Makefile
-# End:

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.mk
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.mk	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetex.mk	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,123 +0,0 @@
-# Makefile fragment for pdfeTeX and web2c. --infovore at xs4all.nl. Public domain.
-# This fragment contains the parts of the makefile that are most likely to
-# differ between releases of pdfeTeX.
-
-Makefile: $(srcdir)/pdfetexdir/pdfetex.mk
-
-# We build pdfetex
-pdfetex = @PETEX@ pdfetex
-pdfetexdir = pdfetexdir
-
-# The C sources.
-pdfetex_c = pdfetexini.c pdfetex0.c pdfetex1.c pdfetex2.c pdfetex3.c
-pdfetex_o = pdfetexini.o pdfetex0.o pdfetex1.o pdfetex2.o pdfetex3.o pdfetexextra.o
-
-# Making pdfetex
-pdfetex: pdftexd.h $(pdfetex_o) $(pdfetexextra_o) $(pdftexlibsdep)
-	@CXXHACKLINK@ $(pdfetex_o) $(pdfetexextra_o) $(pdftexlibs) $(socketlibs) @CXXHACKLDLIBS@ @CXXLDEXTRA@
-
-# C file dependencies.
-$(pdfetex_c) pdfetexcoerce.h pdfetexd.h: pdfetex.p $(web2c_texmf)
-	$(web2c) pdfetex
-pdfetexextra.c: pdfetexdir/pdfetexextra.h lib/texmfmp.c
-	sed s/TEX-OR-MF-OR-MP/pdfetex/ $(srcdir)/lib/texmfmp.c >$@
-pdfetexdir/pdfetexextra.h: pdfetexdir/pdfetexextra.in pdftexdir/pdftex.version etexdir/etex.version
-	sed -e s/PDFTEX-VERSION/`cat pdftexdir/pdftex.version`/ \
-	    -e s/ETEX-VERSION/`cat etexdir/etex.version`/ \
-	  $(srcdir)/pdfetexdir/pdfetexextra.in >$@
-
-# Tangling
-pdfetex.p pdfetex.pool: tangle pdfetex.web pdfetex.ch
-	$(TANGLE) pdfetex.web pdfetex.ch
-
-# Generation of the web and ch file.
-#   Sources for pdfetex.web:
-pdfetex_web_srcs = $(srcdir)/tex.web \
-  $(srcdir)/etexdir/etex.ch \
-  $(srcdir)/etexdir/etex.fix \
-  $(srcdir)/pdfetexdir/pdfetex.ch1 \
-  $(srcdir)/pdftexdir/pdftex.ch \
-  $(srcdir)/pdftexdir/hz.ch \
-  $(srcdir)/pdftexdir/misc.ch \
-  $(srcdir)/pdftexdir/vadjust.ch \
-  $(srcdir)/pdfetexdir/pdfetex.ch2
-#   Sources for pdfetex.ch:
-pdfetex_ch_srcs = pdfetex.web \
-  $(srcdir)/pdfetexdir/tex.ch0 \
-  $(srcdir)/tex.ch \
-  $(srcdir)/etexdir/tex.ch1 \
-  $(srcdir)/etexdir/tex.ech \
-  $(srcdir)/pdfetexdir/tex.ch1 \
-  $(srcdir)/pdftexdir/tex.pch
-#   Rules:
-pdfetex.web: tie pdfetexdir/pdfetex.mk $(pdfetex_web_srcs)
-	$(TIE) -m pdfetex.web $(pdfetex_web_srcs)
-pdfetex.ch: $(pdfetex_ch_srcs)
-	$(TIE) -c pdfetex.ch $(pdfetex_ch_srcs)
-
-$(srcdir)/pdfetexdir/pdfetex.h: $(srcdir)/pdftexdir/pdftex.h
-	cp -f $(srcdir)/pdftexdir/pdftex.h $@
-
-$(srcdir)/pdfetexdir/pdfetex.defines: $(srcdir)/pdftexdir/pdftex.defines
-	cp -f $(srcdir)/pdftexdir/pdftex.defines $@
-
-check: @PETEX@ pdfetex-check
-pdfetex-check: pdfetex pdfetex.fmt
-
-clean:: pdfetex-clean
-pdfetex-clean:
-	$(LIBTOOL) --mode=clean $(RM) pdfetex
-	rm -f $(pdfetex_o) $(pdfetex_c) pdfetexextra.c pdfetexcoerce.h
-	rm -f pdfetexdir/pdfetexextra.h
-	rm -f pdfetexd.h pdfetex.p pdfetex.pool pdfetex.web pdfetex.ch
-	rm -f pdfetex.fmt pdfetex.log
-
-# Dumps
-all_pdfefmts = @FMU@ pdfetex.fmt $(pdfefmts)
-
-dumps: @PETEX@ pdfefmts
-pdfefmts: $(all_pdfefmts)
-
-pdfefmtdir = $(web2cdir)/pdfetex
-$(pdfefmtdir)::
-	$(SHELL) $(top_srcdir)/../mkinstalldirs $(pdfefmtdir)
-
-pdfetex.fmt: pdfetex
-	$(dumpenv) $(MAKE) progname=pdfetex files="etex.src plain.tex cmr10.tfm" prereq-check
-	$(dumpenv) ./pdfetex --progname=pdfetex --jobname=pdfetex --ini \*\\pdfoutput=1\\input etex.src \\dump </dev/null
-
-pdflatex.fmt: pdfetex
-	$(dumpenv) $(MAKE) progname=pdflatex files="latex.ltx" prereq-check
-	$(dumpenv) ./pdfetex --progname=pdflatex --jobname=pdflatex --ini \*\\pdfoutput=1\\input latex.ltx </dev/null
-
-# 
-# Installation.
-install-pdfetex: install-pdfetex-exec install-pdfetex-data
-install-pdfetex-exec: install-pdfetex-links
-install-pdfetex-data: install-pdfetex-pool @FMU@ install-pdfetex-dumps
-install-pdfetex-dumps: install-pdfetex-fmts
-
-# The actual binary executables and pool files.
-install-programs: @PETEX@ install-pdfetex-programs
-install-pdfetex-programs: $(pdfetex) $(bindir)
-	for p in pdfetex; do $(INSTALL_LIBTOOL_PROG) $$p $(bindir); done
-
-install-links: @PETEX@ install-pdfetex-links
-install-pdfetex-links: install-pdfetex-programs
-	#cd $(bindir) && (rm -f pdfeinitex pdfevirtex; \
-	#  $(LN) pdfetex pdfeinitex; $(LN) pdfetex pdfevirtex)
-
-install-fmts: @PETEX@ install-pdfetex-fmts
-install-pdfetex-fmts: pdfefmts $(pdfefmtdir)
-	pdfefmts="$(all_pdfefmts)"; \
-	  for f in $$pdfefmts; do $(INSTALL_DATA) $$f $(pdfefmtdir)/$$f; done
-	pdfefmts="$(pdfefmts)"; \
-	  for f in $$pdfefmts; do base=`basename $$f .fmt`; \
-	    (cd $(bindir) && (rm -f $$base; $(LN) pdfetex $$base)); done
-
-# Auxiliary files.
-install-data:: @PETEX@ install-pdfetex-data
-install-pdfetex-pool: pdfetex.pool $(texpooldir)
-	$(INSTALL_DATA) pdfetex.pool $(texpooldir)/pdfetex.pool
-
-# end of pdfetex.mk

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetexextra.in
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetexextra.in	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/pdfetexextra.in	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,41 +0,0 @@
-/*
-Copyright (c) 1996-2004 Han The Thanh, <thanh at pdftex.org>
-
-This file is part of pdfTeX.
-
-pdfTeX is free software; you can redistribute it and/or modify
-it under the terms of the GNU General Public License as published by
-the Free Software Foundation; either version 2 of the License, or
-(at your option) any later version.
-
-pdfTeX is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-GNU General Public License for more details.
-
-You should have received a copy of the GNU General Public License
-along with pdfTeX; if not, write to the Free Software
-Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-
-$Id: pdfetexextra.in,v 1.4 2004/08/26 18:19:57 olaf Exp $
-*/
-
-/* pdfetexextra.in: banner etc. for pdfeTeX.
-
-   This is included by pdfeTeX, from ../pdfetexextra.c
-   (generated from ../lib/texmfmp.c).
-*/
-
-#define BANNER "This is pdfeTeX, Version 3.141592-PDFTEX-VERSION-ETEX-VERSION"
-#define COPYRIGHT_HOLDER "Peter Breitenlohner (eTeX)/Han The Thanh (pdfTeX)"
-#define AUTHOR NULL
-#define PROGRAM_HELP PDFETEXHELP
-#define BUG_ADDRESS "pdftex at tug.org"
-#define DUMP_VAR TEXformatdefault
-#define DUMP_LENGTH_VAR formatdefaultlength
-#define DUMP_OPTION "fmt"
-#define DUMP_EXT ".fmt"
-#define INPUT_FORMAT kpse_tex_format
-#define INI_PROGRAM "pdfeinitex"
-#define VIR_PROGRAM "pdfevirtex"
-

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/tex.ch0
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/tex.ch0	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/tex.ch0	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,42 +0,0 @@
-%
-% Copyright (c) 1996-2002 Han The Thanh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: //depot/Build/source.development/TeX/texk/web2c/pdfetexdir/tex.ch0#10 $
-%
-% Change file to assist in creating the web2c-specific change file.
-% This one comes first, resolves inconsistencies between the generated
-% pdfetex.web and tex.ch
-
- at x [1.2] l.188
- at d TeX_banner=='This is TeX, Version 3.141592' {printed when \TeX\ starts}
-@#
- at d banner==pdfeTeX_banner
- at y
- at d banner=='This is TeX, Version 3.141592' {printed when \TeX\ starts}
- at z
-
- at x [17.236] l.4960 - first web2c, then pdfTeX, then e-TeX additional integer parameters
- at d tex_int_pars=55 {total number of \TeX's integer parameters}
-@#
- at d pdftex_first_integer_code = tex_int_pars {base for \pdfTeX's integer parameters}
- at y
- at d int_pars=55 {total number of integer parameters}
-@#
- at d etex_int_base=tex_int_pars {base for \eTeX's integer parameters}
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/tex.ch1
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/tex.ch1	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/tex.ch1	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,45 +0,0 @@
-%
-% Copyright (c) 1996-2002 Han The Thanh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: //depot/Build/source.development/TeX/texk/web2c/pdfetexdir/tex.ch1#12 $
-%
-% Change file to assist in creating the web2c-specific change file.
-% This one resolves inconsistencies between the etex changes for
-% web2c and pdftex changes for web2c.
-
- at x [1] m.2 l.188 - Web2C: extensions imply we're not pdfeTeX
- at d pdfeTeX_banner=='This is pdfeTeX, Version 3.141592',pdftex_version_string,eTeX_version_string
- at y
- at d pdfeTeX_banner_k=='This is pdfeTeXk, Version 3.141592',pdftex_version_string,eTeX_version_string
- at d pdfeTeX_banner=='This is pdfeTeX, Version 3.141592',pdftex_version_string,eTeX_version_string
- at z
-
- at x [1] m.2 l.188 - banner
- at d banner==eTeX_banner
- at d banner_k==eTeX_banner_k
- at y
- at d banner==pdfeTeX_banner
- at d banner_k==pdfeTeX_banner_k
- at z
-
- at x [17.236] l.4960 - first web2c, then pdfTeX, then e-TeX additional integer parameters
- at d etex_int_base=web2c_int_pars {base for \eTeX's integer parameters}
- at y
- at d pdftex_first_integer_code = web2c_int_pars {base for \pdfTeX's integer parameters}
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/tex.ch2
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/tex.ch2	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfetexdir/tex.ch2	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,21 +0,0 @@
-%
-% Copyright (c) 1996-2002 Han The Thanh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: //depot/Build/source.development/TeX/texk/web2c/pdfetexdir/tex.ch2#8 $
-%

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/TODO
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/TODO	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/TODO	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,10 +0,0 @@
-TODO for pdfTeX:
-- enable pdfTeX to output PDF/X-3 compliant PDF
-- allow access to the object number of the current page
-- document the sources
-- PDF 1.5
-- colorstack
-- access to the ctcm
-
-$Id: //depot/Build/source.development/TeX/texk/web2c/pdftexdir/TODO#7 $
-// vim: tw=79

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/hz.ch
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/hz.ch	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/hz.ch	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,1800 +0,0 @@
-% WEB change file containing HZ extensions for pdfTeX 
-%
-% Copyright (c) 1996-2002 Han Th\^e\llap{\raise 0.5ex\hbox{\'{}}} Th\`anh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: //depot/Build/source.development/TeX/texk/web2c/pdftexdir/hz.ch#12 $
-
- at x [155] - margin kerning
- at d acc_kern=2 {|subtype| of kern nodes from accents}
- at y
- at d acc_kern=2 {|subtype| of kern nodes from accents}
- at d margin_kern_node = 40
- at d margin_kern_node_size = 3
- at d margin_char(#) == info(# + 2)
- at d left_side == 0
- at d right_side == 1
- at d lp_code_base == 2
- at d rp_code_base == 3
- at d ef_code_base == 4
- at d max_hlist_stack = 512 {maximum fill level for |hlist_stack|}
-{maybe good if larger than |2 * max_quarterword|, so that box nesting level would overflow first}
- at z
-
- at x [183] - margin kerning
-  kern_node: @<Display kern |p|@>;
- at y
-  margin_kern_node: begin
-    print_esc("kern");
-    print_scaled(width(p));
-    if subtype(p) = left_side then
-        print(" (left margin)")
-    else
-        print(" (right margin)");
-    end;
-  kern_node: @<Display kern |p|@>;
- at z
-
- at x [202] - margin kerning
-    kern_node,math_node,penalty_node: do_nothing;
- at y
-    margin_kern_node: begin
-        free_avail(margin_char(p));
-        free_node(p, margin_kern_node_size);
-        goto done;
-      end;
-    kern_node,math_node,penalty_node: do_nothing;
- at z
-
- at x [206] - margin kerning
-kern_node,math_node,penalty_node: begin r:=get_node(small_node_size);
-  words:=small_node_size;
-  end;
- at y
-kern_node,math_node,penalty_node: begin r:=get_node(small_node_size);
-  words:=small_node_size;
-  end;
-margin_kern_node: begin
-    r := get_node(margin_kern_node_size);
-    fast_get_avail(margin_char(r));
-    font(margin_char(r)) := font(margin_char(p));
-    character(margin_char(r)) := character(margin_char(p));
-    words := small_node_size;
-  end;
- at z
-
- at x [236]
- at d pdf_int_pars=pdftex_first_integer_code + 10 {total number of \pdfTeX's integer parameters}
- at y
- at d pdf_adjust_spacing_code   = pdftex_first_integer_code + 10 {level of spacing adjusting}
- at d pdf_protrude_chars_code   = pdftex_first_integer_code + 11 {protrude chars at left/right edge of paragraphs}
- at d pdf_int_pars=pdftex_first_integer_code + 12 {total number of \pdfTeX's integer parameters}
- at z
-
- at x [236]
- at d error_context_lines==int_par(error_context_lines_code)
- at y
- at d error_context_lines==int_par(error_context_lines_code)
-@#
- at d pdf_adjust_spacing   == int_par(pdf_adjust_spacing_code)
- at d pdf_protrude_chars   == int_par(pdf_protrude_chars_code)
- at z
-
- at x [237]
-error_context_lines_code:print_esc("errorcontextlines");
- at y
-error_context_lines_code:print_esc("errorcontextlines");
-@#
-pdf_adjust_spacing_code:   print_esc("pdfadjustspacing");
-pdf_protrude_chars_code:   print_esc("pdfprotrudechars");
- at z
-
- at x [238]
-primitive("errorcontextlines",assign_int,int_base+error_context_lines_code);@/
-@!@:error_context_lines_}{\.{\\errorcontextlines} primitive@>
- at y
-primitive("errorcontextlines",assign_int,int_base+error_context_lines_code);@/
-@!@:error_context_lines_}{\.{\\errorcontextlines} primitive@>
-primitive("pdfadjustspacing",assign_int,int_base+pdf_adjust_spacing_code);@/
-@!@:pdf_adjust_spacing_}{\.{\\pdfadjustspacing} primitive@>
-primitive("pdfprotrudechars",assign_int,int_base+pdf_protrude_chars_code);@/
-@!@:pdf_protrude_chars_}{\.{\\pdfprotrudechars} primitive@>
- at z
-
- at x [413] - font expansion
-var m:halfword; {|chr_code| part of the operand token}
- at y
-var m:halfword; {|chr_code| part of the operand token}
-    n, k: integer; {accumulators}
- at z
-
- at x [426] - font expansion, margin kerning
-begin scan_font_ident;
-if m=0 then scanned_result(hyphen_char[cur_val])(int_val)
-else scanned_result(skew_char[cur_val])(int_val);
- at y
-begin scan_font_ident;
-if m=0 then scanned_result(hyphen_char[cur_val])(int_val)
-else if m=1 then scanned_result(skew_char[cur_val])(int_val)
-else begin
-    n := cur_val;
-    scan_char_num;
-    k := cur_val;
-    case m of 
-    lp_code_base: scanned_result(get_lp_code(n, k))(int_val);
-    rp_code_base: scanned_result(get_rp_code(n, k))(int_val);
-    ef_code_base: scanned_result(get_ef_code(n, k))(int_val);
-    end;
-end;
- at z
-
- at x [622] - margin kerning
-glue_node: @<Move right or output leaders@>;
- at y
-glue_node: @<Move right or output leaders@>;
-margin_kern_node,
- at z
-
-
- at x [???] - font expansion
-@!tmp_f: internal_font_number; {for use with |pdf_init_font|}
-
- at y
-@!tmp_f: internal_font_number; {for use with |pdf_init_font|}
-@ Here come some subroutines to deal with expanded fonts for HZ-algorithm.
-
- at p
-function init_font_base(v: integer): integer;
-var i, j: integer;
-begin
-    i := pdf_get_mem(256);
-    for j := 0 to 255 do
-        pdf_mem[i + j] := v;
-    init_font_base := i;
-end;
-
-procedure set_lp_code(f: internal_font_number; c: eight_bits; i: integer);
-begin
-    if pdf_font_lp_base[f] = 0 then
-        pdf_font_lp_base[f] := init_font_base(0);
-    pdf_mem[pdf_font_lp_base[f] + c] := fix_int(i, -1000, 1000);
-end;
-
-procedure set_rp_code(f: internal_font_number; c: eight_bits; i: integer);
-begin
-    if pdf_font_rp_base[f] = 0 then
-        pdf_font_rp_base[f] := init_font_base(0);
-    pdf_mem[pdf_font_rp_base[f] + c] := fix_int(i, -1000, 1000);
-end;
-
-procedure set_ef_code(f: internal_font_number; c: eight_bits; i: integer);
-begin
-    if pdf_font_ef_base[f] = 0 then
-        pdf_font_ef_base[f] := init_font_base(1000);
-    pdf_mem[pdf_font_ef_base[f] + c] := fix_int(i, 0, 1000);
-end;
-
-function expand_font_name(f: internal_font_number; e: integer): str_number;
-var old_setting:0..max_selector; {holds |selector| setting}
-begin
-    old_setting:=selector; selector:=new_string;
-    print(font_name[f]);
-    if e > 0 then
-        print("+"); {minus sign will be printed by |print_int|}
-    print_int(e);
-    selector:=old_setting;
-    expand_font_name := make_string;
-end;
-
-function auto_expand_font(f: internal_font_number; e: integer): internal_font_number;
-{creates an expanded font from the base font; doesn't load expanded tfm at all}
-var k: internal_font_number;
-    nw, nk, ni, i, j: integer;
-begin
-    k := font_ptr + 1;
-    incr(font_ptr);
-    if (font_ptr >= font_max) then
-        overflow("maximum internal font number (font_max)", font_max);
-    font_name[k] := expand_font_name(f, e);
-    font_area[k] := font_area[f];
-    hyphen_char[k] := hyphen_char[f];
-    skew_char[k] := skew_char[f];
-    font_bchar[k] := font_bchar[f];
-    font_false_bchar[k] := font_false_bchar[f];
-    font_bc[k] := font_bc[f];
-    font_ec[k] := font_ec[f];
-    font_size[k] := font_size[f];
-    font_dsize[k] := font_dsize[f];
-    font_params[k] := font_params[f];
-    font_glue[k] := font_glue[f];
-    bchar_label[k] := bchar_label[f];
-
-    char_base[k] := char_base[f];
-    height_base[k] := height_base[f];
-    depth_base[k] := depth_base[f];
-    lig_kern_base[k] := lig_kern_base[f];
-    exten_base[k] := exten_base[f];
-    param_base[k] := param_base[f];
-    
-    nw := height_base[f] - width_base[f];
-    ni := lig_kern_base[f] - italic_base[f];
-    nk := exten_base[f] - (kern_base[f] + kern_base_offset);
-    if (fmem_ptr + nw + ni + nk >= font_mem_size) then
-        overflow("number of words of font memory (font_mem_size)", font_mem_size);
-    width_base[k] := fmem_ptr;
-    italic_base[k] := width_base[k] + nw;
-    kern_base[k] := italic_base[k] + ni - kern_base_offset;
-    fmem_ptr := fmem_ptr + nw + ni + nk;
-
-    for i := 0 to nw - 1 do
-        font_info[width_base[k] + i].sc := 
-           round_xn_over_d(font_info[width_base[f] + i].sc, 1000 + e, 1000);
-    for i := 0 to ni - 1 do
-        font_info[italic_base[k] + i].sc := 
-           round_xn_over_d(font_info[italic_base[f] + i].sc, 1000 + e, 1000);
-    for i := 0 to nk - 1 do
-        font_info[kern_base[k] + kern_base_offset + i].sc := 
-           round_xn_over_d(font_info[kern_base[f] + kern_base_offset + i].sc, 1000 + e, 1000);
-    
-    auto_expand_font := k;
-end;
-
-procedure set_expand_param(k, f: internal_font_number; e: integer);
-var i, j: integer;
-begin
-    if pdf_font_rp_base[f] = 0 then
-        pdf_font_rp_base[f] := init_font_base(0);
-    if pdf_font_lp_base[f] = 0 then
-        pdf_font_lp_base[f] := init_font_base(0);
-    if pdf_font_ef_base[f] = 0 then
-        pdf_font_ef_base[f] := init_font_base(1000);
-    pdf_font_expand_ratio[k] := e;
-    pdf_font_step[k] := pdf_font_step[f];
-    pdf_font_auto_expand[k] := pdf_font_auto_expand[f];
-    pdf_font_blink[k] := f; {???}
-    pdf_font_lp_base[k] := pdf_font_lp_base[f];
-    pdf_font_rp_base[k] := pdf_font_rp_base[f];
-    pdf_font_ef_base[k] := pdf_font_ef_base[f];
-end;
-
-function tfm_lookup(s: str_number; fs: scaled): internal_font_number;
-{looks up for a TFM with name |s| loaded at |fs| size; if found then flushes |s|}
-var k: internal_font_number;
-begin
-    if fs <> 0 then begin
-        for k := font_base + 1 to font_ptr do 
-            if str_eq_str(font_name[k], s) and (font_size[k] = fs) then begin
-                flush_str(s);
-                tfm_lookup := k;
-                return;
-            end;
-    end
-    else begin
-        for k := font_base + 1 to font_ptr do 
-            if str_eq_str(font_name[k], s) then begin
-                flush_str(s);
-                tfm_lookup := k;
-                return;
-            end;
-    end;
-    tfm_lookup := null_font;
-end;
-
-function load_expand_font(f: internal_font_number; e: integer): internal_font_number;
-{loads font |f| expanded by |e| thousandths into font memory; |e| is nonzero
-and is a multiple of |pdf_font_step[f]|}
-label found;
-var s: str_number; {font name}
-    k: internal_font_number;
-begin
-    s := expand_font_name(f, e);
-    k := tfm_lookup(s, font_size[f]);
-    if k = null_font then begin
-        if pdf_font_auto_expand[f] then 
-            k := auto_expand_font(f, e)
-        else
-            k := read_font_info(null_cs, s, "", font_size[f]);
-    end;
-    set_expand_param(k, f, e);
-    load_expand_font := k;
-end;
-
-function auto_expand_vf(f: internal_font_number): boolean;
-{check for a virtual auto-expanded font}
-var save_f, bf, lf, k: internal_font_number;
-    e: integer;
-begin
-    auto_expand_vf := false;
-    if (not pdf_font_auto_expand[f]) or (pdf_font_blink[f] = null_font) then 
-        return; {not an auto-expanded font}
-    bf := pdf_font_blink[f];
-    if pdf_font_type[bf] = new_font_type then {we must process the base font first}
-    begin
-        save_f := tmp_f;
-        tmp_f := bf;
-        do_vf; 
-        tmp_f := save_f;
-    end;
-
-    if pdf_font_type[bf] <> virtual_font_type then 
-        return; {not a virtual font}
-
-    e := pdf_font_expand_ratio[f];
-    for k := 0 to vf_local_font_num[bf] - 1 do begin
-        lf := vf_default_font[bf] + k;
-        vf_e_fnts[vf_nf] := vf_e_fnts[lf];
-        vf_i_fnts[vf_nf] := auto_expand_font(vf_i_fnts[lf], e);
-        set_expand_param(vf_i_fnts[vf_nf], vf_i_fnts[lf], e);
-        incr(vf_nf);
-    end;
-    vf_packet_base[f] := vf_packet_base[bf];
-    vf_local_font_num[f] := vf_local_font_num[bf];
-    vf_default_font[f] := vf_nf - vf_local_font_num[f];
-
-    pdf_font_type[f] := virtual_font_type;
-    auto_expand_vf := true;
-end;
-
-function fix_expand_value(f: internal_font_number; e: integer): integer;
-{return the multiple of |pdf_font_step[f]| that is nearest to |e|}
-var step: integer;
-    max_expand: integer;
-    neg: boolean;
-begin
-    fix_expand_value := 0;
-    if e = 0 then 
-        return;
-    if e < 0 then begin
-        e := -e;
-        neg := true;
-        max_expand := -pdf_font_expand_ratio[pdf_font_shrink[f]];
-    end
-    else begin
-        neg := false;
-        max_expand := pdf_font_expand_ratio[pdf_font_stretch[f]];
-    end;
-    if e > max_expand then
-        e :=  max_expand
-    else begin
-        step := pdf_font_step[f];
-        if e mod step > 0 then
-            e := step*round_xn_over_d(e, 1, step);
-    end;
-    if neg then
-        e := -e;
-    fix_expand_value := e;
-end;
-
-function get_expand_font(f: internal_font_number; e: integer): internal_font_number;
-{look up and create if not found an expanded version of |f|; |f| is an
-expandable font; |e| is nonzero and is a multiple of |pdf_font_step[f]|}
-var k: internal_font_number;
-begin
-    k := pdf_font_elink[f];
-    while k <> null_font do begin
-        if pdf_font_expand_ratio[k] = e then begin
-            get_expand_font := k;
-            return;
-        end;
-        k := pdf_font_elink[k];
-    end;
-    k := load_expand_font(f, e);
-    pdf_font_elink[k] := pdf_font_elink[f];
-    pdf_font_elink[f] := k;
-    get_expand_font := k;
-end;
-
-function expand_font(f: internal_font_number; e: integer): internal_font_number;
-{looks up for font |f| expanded by |e| thousandths, |e| is an arbitrary value
-between max stretch and max shrink of |f|; if not found then creates it}
-var max_expand: integer;
-begin
-    expand_font := f;
-    if e = 0 then
-        return;
-    e := fix_expand_value(f, e);
-    if e = 0 then
-        return;
-    if pdf_font_elink[f] = null_font then
-        pdf_error("font expansion", "uninitialized pdf_font_elink");
-    expand_font := get_expand_font(f, e);
-end;
-
-procedure read_expand_font; {read font expansion spec and load expanded font}
-var font_shrink, font_stretch, font_step: integer;
-    f: internal_font_number;
-    auto_expand: boolean;
-begin
-    {read font expansion parameters}
-    scan_font_ident;
-    f := cur_val;
-    if f = null_font then
-        pdf_error("font expansion", "invalid font identifier");
-    scan_optional_equals;
-    scan_int;
-    font_stretch := fix_int(cur_val, 0, 1000);
-    scan_int;
-    font_shrink := fix_int(cur_val, 0, 1000);
-    scan_int;
-    font_step := fix_int(cur_val, 0, 1000);
-    if font_step = 0 then
-        pdf_error("font expansion", "invalid step");
-    font_stretch := font_stretch - font_stretch mod font_step;
-    if font_stretch < 0 then
-        font_stretch := 0;
-    font_shrink := font_shrink - font_shrink mod font_step;
-    if font_shrink < 0 then
-        font_shrink := 0;
-    if font_shrink = 1000 then
-        font_shrink := font_shrink - font_step; {don't allow zero-width font}
-    if (font_stretch = 0) and (font_shrink = 0) then
-        pdf_error("font expansion", "invalid limit");
-    auto_expand := false;
-    if scan_keyword("autoexpand") then
-        auto_expand := true;
-
-    {check if the font can be expanded}
-    if (pdf_font_expand_ratio[f] <> 0) then
-        pdf_error("font expansion", "this font has been expanded by another font so it cannot be used now");
-    if (pdf_font_step[f] <> 0) then
-    {this font has been expanded, ensure the expansion parameters are identical}
-    begin
-        if (pdf_font_step[f] <> font_step) or
-           ((pdf_font_stretch[f] = null_font) and (font_stretch <> 0)) or
-           ((pdf_font_stretch[f] <> null_font) and 
-            (pdf_font_expand_ratio[pdf_font_stretch[f]] <> font_stretch)) or
-           ((pdf_font_shrink[f] = null_font) and (font_shrink <> 0)) or
-           ((pdf_font_shrink[f] <> null_font) and 
-            (pdf_font_expand_ratio[pdf_font_shrink[f]] <> -font_shrink)) or
-           (pdf_font_auto_expand[f] <> auto_expand) 
-        then 
-            pdf_error("font expansion", "font has been expanded with different parameters");
-    end 
-    else begin
-        pdf_font_step[f] := font_step;
-        pdf_font_auto_expand[f] := auto_expand;
-        if font_stretch > 0 then
-            pdf_font_stretch[f] := get_expand_font(f, font_stretch);
-        if font_shrink > 0 then
-            pdf_font_shrink[f] := get_expand_font(f, -font_shrink);
-    end;
-end;
- at z
-
- at x [32f] - margin kerning
-glue_node: @<(\pdfTeX) Move right or output leaders@>;
- at y
-glue_node: @<(\pdfTeX) Move right or output leaders@>;
-margin_kern_node,
- at z
-
- at x [649] - font expansion
-@ Here now is |hpack|, which contains few if any surprises.
-
- at p function hpack(@!p:pointer;@!w:scaled;@!m:small_number):pointer;
- at y 
-@ @<Glob...@>=
-@!pdf_font_blink: ^internal_font_number; {link to base font (used for expanded fonts only)}
-@!pdf_font_elink: ^internal_font_number; {link to expanded fonts (used for base fonts only)}
-@!pdf_font_stretch: ^integer; {limit of stretching}
-@!pdf_font_shrink: ^integer; {limit of shrinking}
-@!pdf_font_step: ^integer;  {amount of one step of expansion}
-@!pdf_font_expand_ratio: ^integer; {expansion ratio of a particular font}
-@!pdf_font_auto_expand: ^boolean; {this font is auto-expanded?}
-@!pdf_font_lp_base: ^integer; {base of left-protruding factor}
-@!pdf_font_rp_base: ^integer; {base of right-protruding factor}
-@!pdf_font_ef_base: ^integer; {base of font expansion factor}
-@!font_expand_ratio: integer; {current expansion ratio}
-@!last_leftmost_char: pointer;
-@!last_rightmost_char: pointer;
-@!hlist_stack:array[0..max_hlist_stack] of pointer; {stack for |find_protchar_left()| and |find_protchar_right()|}
-@!hlist_stack_level:0..max_hlist_stack; {fill level for |hlist_stack|}
-
-@ @d cal_margin_kern_var(#) ==
-begin
-    character(cp) := character(#);
-    font(cp) := font(#);
-    do_subst_font(cp, 1000);
-    if font(cp) <> font(#) then
-        margin_kern_stretch := margin_kern_stretch + left_pw(#) - left_pw(cp);
-    font(cp) := font(#);
-    do_subst_font(cp, -1000);
-    if font(cp) <> font(#) then
-        margin_kern_shrink := margin_kern_shrink + left_pw(cp) - left_pw(#);
-end
-    
-@<Calculate variations of marginal kerns@>=
-begin
-    lp := last_leftmost_char;
-    rp := last_rightmost_char;
-    fast_get_avail(cp);
-    if lp <> null then
-        cal_margin_kern_var(lp);
-    if rp <> null then
-        cal_margin_kern_var(rp);
-    free_avail(cp);
-end
-
-@ Here is |hpack|, which is place where we do font substituting when
-font expansion is being used. We define some constants used when calling
-|hpack| to deal with font expansion.
-
- at d cal_expand_ratio    == 2 {calculate amount for font expansion after breaking
-                             paragraph into lines}
- at d subst_ex_font       == 3 {substitute fonts}
-
- at d substituted = 3 {|subtype| of kern nodes that should be substituted}
-
- at d left_pw(#) == char_pw(#, left_side)
- at d right_pw(#) == char_pw(#, right_side)
-
- at p
-function check_expand_pars(f: internal_font_number): boolean;
-var k: internal_font_number;
-begin
-    check_expand_pars := false;
-    if (pdf_font_step[f] = 0) or ((pdf_font_stretch[f] = null_font) and 
-                                  (pdf_font_shrink[f] = null_font)) then
-        return;
-    if cur_font_step < 0 then
-        cur_font_step := pdf_font_step[f]
-    else if cur_font_step <> pdf_font_step[f] then
-        pdf_error("font expansion", "using fonts with different step of expansion in one paragraph is not allowed");
-    k := pdf_font_stretch[f];
-    if k <> null_font then begin
-        if max_stretch_ratio < 0 then
-            max_stretch_ratio := pdf_font_expand_ratio[k]
-        else if max_stretch_ratio <> pdf_font_expand_ratio[k] then
-            pdf_error("font expansion", "using fonts with different limit of expansion in one paragraph is not allowed");
-    end;
-    k := pdf_font_shrink[f];
-    if k <> null_font then begin
-        if max_shrink_ratio < 0 then
-            max_shrink_ratio := pdf_font_expand_ratio[k]
-        else if max_shrink_ratio <> pdf_font_expand_ratio[k] then
-            pdf_error("font expansion", "using fonts with different limit of expansion in one paragraph is not allowed");
-    end;
-    check_expand_pars := true;
-end;
-
-function char_stretch(f: internal_font_number; c: eight_bits): scaled;
-var k: internal_font_number;
-    dw: scaled;
-    ef: integer;
-begin
-    char_stretch := 0;
-    k := pdf_font_stretch[f];
-    ef := get_ef_code(f, c);
-    if (k <> null_font) and (ef > 0) then begin
-        dw := char_width(k)(char_info(k)(c)) - char_width(f)(char_info(f)(c));
-        if dw > 0 then
-            char_stretch := round_xn_over_d(dw, ef, 1000);
-    end;
-end;
-
-function char_shrink(f: internal_font_number; c: eight_bits): scaled;
-var k: internal_font_number;
-    dw: scaled;
-    ef: integer;
-begin
-    char_shrink := 0;
-    k := pdf_font_shrink[f];
-    ef := get_ef_code(f, c);
-    if (k <> null_font) and (ef > 0) then begin
-        dw := char_width(f)(char_info(f)(c)) - char_width(k)(char_info(k)(c));
-        if dw > 0 then
-            char_shrink := round_xn_over_d(dw, ef, 1000);
-    end;
-end;
-
-function get_kern(f: internal_font_number; lc, rc: eight_bits): scaled;
-label continue;
-var i: four_quarters;
-    j: four_quarters;
-    k: font_index;
-    p: pointer;
-    s: integer;
-begin
-    get_kern := 0;
-    i := char_info(f)(lc);
-    if char_tag(i) <> lig_tag then
-        return;
-    k := lig_kern_start(f)(i);
-    j := font_info[k].qqqq;
-    if skip_byte(j) <= stop_flag then
-        goto continue + 1;
-    k := lig_kern_restart(f)(j);
-continue:
-    j := font_info[k].qqqq;
-continue + 1:
-    if (next_char(j) = rc) and (skip_byte(j) <= stop_flag) and 
-       (op_byte(j) >= kern_flag)
-    then begin
-        get_kern := char_kern(f)(j);
-        return;
-    end;
-    if skip_byte(j) = qi(0) then
-        incr(k)
-    else begin
-        if skip_byte(j) >= stop_flag then
-            return;
-        k := k + qo(skip_byte(j)) + 1;
-    end;
-    goto continue;
-end;
-
-function kern_stretch(p: pointer): scaled;
-var l, r: pointer;
-    d: scaled;
-begin
-    kern_stretch := 0;
-    if (prev_char_p = null) or (link(prev_char_p) <> p) or (link(p) = null)
-    then
-        return;
-    l := prev_char_p;
-    r := link(p);
-    if type(l) = ligature_node then
-        l := lig_char(l);
-    if type(r) = ligature_node then
-        r := lig_char(r);
-    if not (is_char_node(l) and is_char_node(r) and 
-            (font(l) = font(r)) and 
-            (pdf_font_stretch[font(l)] <> null_font))
-    then
-        return;
-    d := get_kern(pdf_font_stretch[font(l)], character(l), character(r));
-    kern_stretch := round_xn_over_d(d - width(p), 
-                                    get_ef_code(font(l), character(l)), 1000);
-end;
-
-function kern_shrink(p: pointer): scaled;
-var l, r: pointer;
-    d: scaled;
-begin
-    kern_shrink := 0;
-    if (prev_char_p = null) or (link(prev_char_p) <> p) or (link(p) = null)
-    then
-        return;
-    l := prev_char_p;
-    r := link(p);
-    if type(l) = ligature_node then
-        l := lig_char(l);
-    if type(r) = ligature_node then
-        r := lig_char(r);
-    if not (is_char_node(l) and is_char_node(r) and 
-            (font(l) = font(r)) and 
-            (pdf_font_shrink[font(l)] <> null_font))
-    then
-        return;
-    d := get_kern(pdf_font_shrink[font(l)], character(l), character(r));
-    kern_shrink := round_xn_over_d(width(p) - d, 
-                                    get_ef_code(font(l), character(l)), 1000);
-end;
-
-procedure do_subst_font(p: pointer; ex_ratio: integer);
-var f, k: internal_font_number;
-    r: pointer;
-    ef: integer;
-begin
-    if not is_char_node(p) and (type(p) = disc_node) then begin
-        r := pre_break(p);
-        while r <> null do begin
-            if is_char_node(r) or (type(r) = ligature_node) then
-                do_subst_font(r, ex_ratio);
-            r := link(r);
-        end;
-        r := post_break(p);
-        while r <> null do begin
-            if is_char_node(r) or (type(r) = ligature_node) then
-                do_subst_font(r, ex_ratio);
-            r := link(r);
-        end;
-        return;
-    end;
-    if is_char_node(p) then
-        r := p
-    else if type(p) = ligature_node then
-        r := lig_char(p)
-    else begin
-        {|short_display_n(p, 5);|}
-        pdf_error("font expansion", "invalid node type");
-    end;
-    f := font(r);
-    ef := get_ef_code(f, character(r));
-    if ef = 0 then
-        return;
-    if (pdf_font_stretch[f] <> null_font) and (ex_ratio > 0) then
-        k := expand_font(f, divide_scaled(ex_ratio*
-                                pdf_font_expand_ratio[pdf_font_stretch[f]]*ef,
-                                1000000, 0))
-    else if (pdf_font_shrink[f] <> null_font) and (ex_ratio < 0) then
-        k := expand_font(f, -divide_scaled(ex_ratio*
-                                pdf_font_expand_ratio[pdf_font_shrink[f]]*ef,
-                                1000000, 0))
-    else
-        k := f;
-    if k <> f then begin
-        font(r) := k;
-        if not is_char_node(p) then begin
-            r := lig_ptr(p);
-            while r <> null do begin
-                font(r) := k;
-                r := link(r);
-            end;
-        end;
-    end;
-end;
-
-function char_pw(p: pointer; side: small_number): scaled;
-var f: internal_font_number;
-    c: integer;
-begin
-    char_pw := 0;
-    if side = left_side then
-        last_leftmost_char := null
-    else
-        last_rightmost_char := null;
-    if p = null then
-        return;
-    if not is_char_node(p) then begin
-        if type(p) = ligature_node then
-            p := lig_char(p)
-        else 
-            return;
-    end;
-    f := font(p);
-    if side = left_side then begin
-        c := get_lp_code(f, character(p));
-        last_leftmost_char := p;
-    end
-    else begin
-        c := get_rp_code(f, character(p));
-        last_rightmost_char := p;
-    end;
-    if c = 0 then
-        return;
-    char_pw := 
-        round_xn_over_d(quad(f), c, 1000);
-end;
-
-function new_margin_kern(w: scaled; p: pointer; side: small_number): pointer;
-var k: pointer;
-begin
-    k := get_node(margin_kern_node_size);
-    type(k) := margin_kern_node;
-    subtype(k) := side;
-    width(k) := w;
-    if p = null then
-        pdf_error("margin kerning", "invalid pointer to marginal char node");
-    fast_get_avail(margin_char(k));
-    character(margin_char(k)) := character(p);
-    font(margin_char(k)) := font(p);
-    new_margin_kern := k;
-end;
-
-function hpack(@!p:pointer;@!w:scaled;@!m:small_number):pointer;
- at z
-
- at x [649] - font expansion
-begin last_badness:=0; r:=get_node(box_node_size); type(r):=hlist_node;
-subtype(r):=min_quarterword; shift_amount(r):=0;
-q:=r+list_offset; link(q):=p;@/
- at y
-font_stretch: scaled;
-font_shrink: scaled;
-k: scaled;
-begin last_badness:=0; r:=get_node(box_node_size); type(r):=hlist_node;
-subtype(r):=min_quarterword; shift_amount(r):=0;
-q:=r+list_offset; link(q):=p;@/
-if m = cal_expand_ratio then begin
-    prev_char_p := null;
-    font_stretch := 0;
-    font_shrink := 0;
-    font_expand_ratio := 0;
-end;
- at z
-
- at x [649] - font expansion
-hpack:=r;
- at y
-if (m = cal_expand_ratio) and (font_expand_ratio <> 0) then begin
-    font_expand_ratio := fix_int(font_expand_ratio, -1000, 1000);
-    q := list_ptr(r);
-    free_node(r, box_node_size);
-    r := hpack(q, w, subst_ex_font);
-end;
-hpack:=r;
- at z
-
- at x [651] - font expansion
-  kern_node: x:=x+width(p);
- at y
-  margin_kern_node: begin
-    if m = cal_expand_ratio then begin
-        f := font(margin_char(p));
-        do_subst_font(margin_char(p), 1000);
-        if f <> font(margin_char(p)) then
-            font_stretch := font_stretch - width(p) - 
-                char_pw(margin_char(p), subtype(p));
-        font(margin_char(p)) := f;
-        do_subst_font(margin_char(p), -1000);
-        if f <> font(margin_char(p)) then
-            font_shrink := font_shrink - width(p) -
-                char_pw(margin_char(p), subtype(p));
-        font(margin_char(p)) := f;
-      end
-    else if m = subst_ex_font then begin
-            do_subst_font(margin_char(p), font_expand_ratio);
-            width(p) := -char_pw(margin_char(p), subtype(p));
-      end;
-    x := x + width(p);
-    end;
-  kern_node: begin
-    if (m = cal_expand_ratio) and (subtype(p) = normal) then begin
-        k := kern_stretch(p);
-        if k <> 0 then begin
-            subtype(p) := substituted;
-            font_stretch := font_stretch + k;
-        end;
-        k := kern_shrink(p);
-        if k <> 0 then begin
-            subtype(p) := substituted;
-            font_shrink := font_shrink + k;
-        end;
-      end
-    else if (m = subst_ex_font) and (subtype(p) = substituted) then begin
-        if type(link(p)) = ligature_node then
-            width(p) := get_kern(font(prev_char_p),
-                                 character(prev_char_p),
-                                 character(lig_char(link(p))))
-        else 
-            width(p) := get_kern(font(prev_char_p),
-                                 character(prev_char_p),
-                                 character(link(p)))
-      end;
-    x := x + width(p);
-    end;
- at z
-
- at x [651] - font expansion
-  ligature_node: @<Make node |p| look like a |char_node|
-    and |goto reswitch|@>;
- at y
-  ligature_node: begin
-      if m = subst_ex_font then
-          do_subst_font(p, font_expand_ratio);
-      @<Make node |p| look like a |char_node| and |goto reswitch|@>;
-    end;
-  disc_node:
-      if m = subst_ex_font then
-          do_subst_font(p, font_expand_ratio);
- at z
-
- at x [654] - font expansion
-begin f:=font(p); i:=char_info(f)(character(p)); hd:=height_depth(i);
- at y
-begin
-if m >= cal_expand_ratio then begin
-    prev_char_p := p;
-    case m of
-    cal_expand_ratio: begin
-        f := font(p);
-        add_char_stretch(font_stretch)(character(p));
-        add_char_shrink(font_shrink)(character(p));
-    end;
-    subst_ex_font:
-        do_subst_font(p, font_expand_ratio);
-    endcases;
-end;
-f:=font(p); i:=char_info(f)(character(p)); hd:=height_depth(i);
- at z
-
- at x [658] - font expansion
-@ @<Determine horizontal glue stretch setting...@>=
-begin @<Determine the stretch order@>;
- at y
-@ If |hpack| is called with |m=cal_expand_ratio| we calculate
-|font_expand_ratio| and return without checking for overfull or underfull box.
-
-@<Determine horizontal glue stretch setting...@>=
-begin @<Determine the stretch order@>;
-if (m = cal_expand_ratio) and (o = normal) and (font_stretch > 0) then begin
-    font_expand_ratio := divide_scaled(x, font_stretch, 3);
-    return;
-end;
- at z
-
- at x [664] - font expansion
-@ @<Determine horizontal glue shrink setting...@>=
-begin @<Determine the shrink order@>;
- at y
-@ @<Determine horizontal glue shrink setting...@>=
-begin @<Determine the shrink order@>;
-if (m = cal_expand_ratio) and (o = normal) and (font_shrink > 0) then begin
-    font_expand_ratio := divide_scaled(x, font_shrink, 3);
-    return;
-end;
- at z
-
- at x [822] - font expansion
- at d delta_node_size=7 {number of words in a delta node}
- at y
- at d delta_node_size=9 {number of words in a delta node}
- at z
-
- at x [823] - font expansion, margin kerning, avoiding overfull boxes
-@<Glo...@>=
-@!active_width:array[1..6] of scaled;
-  {distance from first active node to~|cur_p|}
-@!cur_active_width:array[1..6] of scaled; {distance from current active node}
-@!background:array[1..6] of scaled; {length of an ``empty'' line}
-@!break_width:array[1..6] of scaled; {length being computed after current break}
- at y
- at d do_seven_eight(#) == if pdf_adjust_spacing > 1 then begin #(7);#(8); end
- at d do_all_eight(#) == do_all_six(#); do_seven_eight(#)
- at d do_one_seven_eight(#) == #(1); do_seven_eight(#)
-
- at d total_font_stretch == cur_active_width[7] 
- at d total_font_shrink == cur_active_width[8] 
-
- at d save_active_width(#) == prev_active_width[#] := active_width[#]
- at d restore_active_width(#) == active_width[#] := prev_active_width[#]
-
-@<Glo...@>=
-@!active_width:array[1..8] of scaled;
-  {distance from first active node to~|cur_p|}
-@!cur_active_width:array[1..8] of scaled; {distance from current active node}
-@!background:array[1..8] of scaled; {length of an ``empty'' line}
-@!break_width:array[1..8] of scaled; {length being computed after current break}
-@#
-@!auto_breaking: boolean; {make |auto_breaking| accessible out of |line_break|}
-@!prev_p: pointer; {make |prev_p| accessible out of |line_break|}
-@!first_p: pointer; {to access the first node of the paragraph}
-@!prev_char_p: pointer; {pointer to the previous char of an implicit kern}
-@!next_char_p: pointer; {pointer to the next char of an implicit kern}
-@# 
-@!try_prev_break: boolean; {force break at the previous legal breakpoint?}
-@!prev_legal: pointer; {the previous legal breakpoint}
-@!prev_prev_legal: pointer; {to save |prev_p| corresponding to |prev_legal|}
-@!prev_auto_breaking: boolean; {to save |auto_breaking| corresponding to |prev_legal|}
-@!prev_active_width: array[1..8] of scaled; {to save |active_width| corresponding to |prev_legal|}
-@!rejected_cur_p: pointer; {the last |cur_p| that has been rejected}
-@!before_rejected_cur_p: boolean; {|cur_p| is still before |rejected_cur_p|?}
-@#
-@!max_stretch_ratio: integer; {maximal stretch ratio of expanded fonts}
-@!max_shrink_ratio: integer; {maximal shrink ratio of expanded fonts}
-@!cur_font_step: integer; {the current step of expanded fonts}
- at z
-
- at x [827] - font expansion
-background[6]:=shrink(q)+shrink(r);
- at y
-background[6]:=shrink(q)+shrink(r);
-if pdf_adjust_spacing > 1 then begin
-    background[7] := 0;
-    background[8] := 0;
-    max_stretch_ratio := -1;
-    max_shrink_ratio := -1;
-    cur_font_step := -1;
-    prev_char_p := null;
-end;
- at z
-
- at x [829] - margin kerning
-@<Declare subprocedures for |line_break|@>=
-procedure try_break(@!pi:integer;@!break_type:small_number);
- at y
- at d cp_skipable(#) == {skipable nodes at the margins during character protrusion}
-(
-    not is_char_node(#) and 
-    (
-        (type(#) = ins_node)
-        or (type(#) = mark_node)
-        or (type(#) = adjust_node)
-        or (type(#) = penalty_node)
-        or ((type(#) = whatsit_node) and 
-            (subtype(#) <> pdf_refximage_node) and
-            (subtype(#) <> pdf_refxform_node)) {reference to an image or XObject form}
-        or ((type(#) = disc_node) and 
-            (pre_break(#) = null) and
-            (post_break(#) = null) and 
-            (replace_count(#) = 0)) {an empty |disc_node|}
-        or ((type(#) = math_node) and (width(#) = 0))
-        or ((type(#) = kern_node) and 
-            ((width(#) = 0) or (subtype(#) = normal)))
-        or ((type(#) = hlist_node) and (width(#) = 0) and (height(#) = 0) and 
-            (depth(#) = 0) and (list_ptr(#) = null))
-    )
-)
-
-
-@<Declare subprocedures for |line_break|@>=
-function prev_rightmost(s, e: pointer): pointer;
-{finds the node preceding the rightmost node |e|; |s| is some node 
-before |e|}
-var p: pointer;
-begin
-    prev_rightmost := null;
-    p := s;
-    if p = null then
-        return;
-    while link(p) <> e do begin
-        p := link(p);
-        if p = null then
-            return;
-    end;
-    prev_rightmost := p;
-end;
-
-procedure push_node(p: pointer);
-begin
-    if hlist_stack_level > max_hlist_stack then
-        pdf_error("push_node", "stack overflow");
-    hlist_stack[hlist_stack_level] := p;
-    hlist_stack_level := hlist_stack_level + 1;
-end;
-
-function pop_node: pointer;
-begin
-    hlist_stack_level := hlist_stack_level - 1;
-    if hlist_stack_level < 0 then {would point to some bug}
-        pdf_error("pop_node", "stack underflow (internal error)");
-    pop_node := hlist_stack[hlist_stack_level];
-end;
-
-function find_protchar_left(l: pointer; d: boolean): pointer;
-{searches left to right from list head |l|, returns 1st non-skipable item}
-var t: pointer;
-    run: boolean;
-begin
-    if (link(l) <> null) and (type(l) = hlist_node) and (width(l) = 0)
-        and (height(l) = 0) and (depth(l) = 0) and (list_ptr(l) = null) then
-        l := link(l) {for paragraph start with \.{\\parindent = 0pt}}
-    else if d then
-            while (link(l) <> null) and (not (is_char_node(l) or non_discardable(l))) do
-                l := link(l); {std.\ discardables at line break, \TeX book, p 95}
-    hlist_stack_level := 0;
-    run := true;
-    repeat
-        t := l;
-        while run and (type(l) = hlist_node) and (list_ptr(l) <> null) do begin
-            push_node(l);
-            l := list_ptr(l);
-        end;
-        while run and cp_skipable(l) do begin
-            while (link(l) = null) and (hlist_stack_level > 0) do begin
-                l := pop_node; {don't visit this node again}
-            end;
-            if link(l) <> null then
-                l := link(l)
-            else if hlist_stack_level = 0 then run := false
-        end;
-    until t = l;
-    find_protchar_left := l;
-end;
-
-function find_protchar_right(l, r: pointer): pointer;
-{searches right to left from list tail |r| to head |l|, returns 1st non-skipable item}
-var t: pointer;
-    run: boolean;
-begin
-    find_protchar_right := null;
-    if r = null then return;
-    hlist_stack_level := 0;
-    run := true;
-    repeat
-        t := r;
-        while run and (type(r) = hlist_node) and (list_ptr(r) <> null) do begin
-            push_node(l);
-            push_node(r);
-            l := list_ptr(r);
-            r := l;
-            while link(r) <> null do
-                r := link(r);
-        end;
-        while run and cp_skipable(r) do begin
-            while (r = l) and (hlist_stack_level > 0) do begin
-                r := pop_node; {don't visit this node again}
-                l := pop_node;
-            end;
-            if (r <> l) and (r <> null) then
-                r := prev_rightmost(l, r)
-            else if (r = l) and (hlist_stack_level = 0) then run := false
-        end;
-    until t = r;
-    find_protchar_right := r;
-end;
-
-function total_pw(q, p: pointer): scaled;
-{returns the total width of character protrusion of a line;
-|cur_break(break_node(q))| and |p| is the leftmost resp. rightmost node in the
-horizontal list representing the actual line}
-var l, r, s: pointer;
-    n: integer;
-begin
-    if break_node(q) = null then
-        l := first_p
-    else
-        l := cur_break(break_node(q));
-    r := prev_rightmost(prev_p, p); {get |link(r)=p|}
-    {let's look at the right margin first}
-    {|
-    short_display_n(r, 2);
-    print("&");
-    short_display_n(p, 2);
-    print_ln;
-    |}
-    if (p <> null) and (type(p) = disc_node) and (pre_break(p) <> null) then  
-    {a |disc_node| with non-empty |pre_break|, protrude the last char of |pre_break|}
-    begin
-        r := pre_break(p);
-        while link(r) <> null do
-            r := link(r);
-    end else r := find_protchar_right(l, r);
-    {now the left margin}
-    {|
-        short_display_n(l, 2);
-        print_ln;
-        breadth_max := 10;
-        depth_threshold := 2;
-        show_node_list(l);
-        print_ln;
-    |}
-    if (l <> null) and (type(l) = disc_node) then begin
-        if post_break(l) <> null then begin
-            l := post_break(l); {protrude the first char}
-            goto done;
-        end else {discard |replace_count(l)| nodes}
-        begin
-            n := replace_count(l);
-            l := link(l);
-            while n > 0 do begin 
-                if link(l) <> null then 
-                    l := link(l);
-                decr(n);
-            end;
-        end;
-    end;
-    l := find_protchar_left(l, true);
-done:
-    total_pw := left_pw(l) + right_pw(r);
-end;
-
-procedure try_break(@!pi:integer;@!break_type:small_number);
- at z
-
- at x
-var r:pointer; {runs through the active list}
- at y
-var r:pointer; {runs through the active list}
-@!margin_kern_stretch: scaled;
-@!margin_kern_shrink: scaled;
-@!lp, rp, cp: pointer;
- at z
-
-
- at x [829] - font expansion
-do_all_six(copy_to_cur_active);
- at y
-do_all_eight(copy_to_cur_active);
- at z
-
- at x [832] - font expansion
-  begin do_all_six(update_width);
- at y
-  begin do_all_eight(update_width);
- at z
-
- at x [837] - font expansion
-begin no_break_yet:=false; do_all_six(set_break_width_to_background);
- at y
-begin no_break_yet:=false; do_all_eight(set_break_width_to_background);
- at z
-
- at x [839] - font expansion
-@<Glob...@>=
-@!disc_width:scaled; {the length of discretionary material preceding a break}
- at y
- at d reset_disc_width(#) == disc_width[#] := 0
-
- at d add_disc_width_to_break_width(#) ==  
-    break_width[#] := break_width[#] + disc_width[#]
-
- at d add_disc_width_to_active_width(#) ==  
-    active_width[#] := active_width[#] + disc_width[#]
-
- at d sub_disc_width_from_active_width(#) ==  
-    active_width[#] := active_width[#] - disc_width[#]
-
- at d add_char_stretch_end(#) == char_stretch(f, #)
- at d add_char_stretch(#) == # := # + add_char_stretch_end
-
- at d add_char_shrink_end(#) == char_shrink(f, #)
- at d add_char_shrink(#) == # := # + add_char_shrink_end
-
- at d sub_char_stretch_end(#) == char_stretch(f, #)
- at d sub_char_stretch(#) == # := # - sub_char_stretch_end
-
- at d sub_char_shrink_end(#) == char_shrink(f, #)
- at d sub_char_shrink(#) == # := # - sub_char_shrink_end
-
- at d add_kern_stretch_end(#) == kern_stretch(#)
- at d add_kern_stretch(#) == # := # + add_kern_stretch_end
-
- at d add_kern_shrink_end(#) == kern_shrink(#)
- at d add_kern_shrink(#) == # := # + add_kern_shrink_end
-
- at d sub_kern_stretch_end(#) == kern_stretch(#)
- at d sub_kern_stretch(#) == # := # - sub_kern_stretch_end
-
- at d sub_kern_shrink_end(#) == kern_shrink(#)
- at d sub_kern_shrink(#) == # := # - sub_kern_shrink_end
-
-@<Glob...@>=
-@!disc_width: array[1..8] of scaled; {the length of discretionary material preceding a break}
- at z
-
- at x [840] - font expansion
-break_width[1]:=break_width[1]+disc_width;
- at y
-do_one_seven_eight(add_disc_width_to_break_width);
- at z
-
- at x [841] - font expansion
-  break_width[1]:=break_width[1]-char_width(f)(char_info(f)(character(v)));
- at y
-  break_width[1]:=break_width[1]-char_width(f)(char_info(f)(character(v)));
-  if (pdf_adjust_spacing > 1) and check_expand_pars(f) then begin
-      prev_char_p := v;
-      sub_char_stretch(break_width[7])(character(v));
-      sub_char_shrink(break_width[8])(character(v));
-  end;
- at z
-
- at x [841] - font expansion
-    break_width[1]:=@|break_width[1]-
-      char_width(f)(char_info(f)(character(lig_char(v))));
- at y
-    break_width[1]:=@|break_width[1]-
-      char_width(f)(char_info(f)(character(lig_char(v))));
-    if (pdf_adjust_spacing > 1) and check_expand_pars(f) then begin
-        prev_char_p := v;
-        sub_char_stretch(break_width[7])(character(lig_char(v)));
-        sub_char_shrink(break_width[8])(character(lig_char(v)));
-    end;
- at z
-
- at x [841] - font expansion
-  hlist_node,vlist_node,rule_node,kern_node:
-    break_width[1]:=break_width[1]-width(v);
- at y
-  hlist_node,vlist_node,rule_node,kern_node: begin
-    break_width[1]:=break_width[1]-width(v);
-    if (type(v) = kern_node) and
-       (pdf_adjust_spacing > 1) and (subtype(v) = normal)
-    then begin
-        sub_kern_stretch(break_width[7])(v);
-        sub_kern_shrink(break_width[8])(v);
-    end;
-  end;
- at z
-
- at x [842] - font expansion
-  break_width[1]:=@|break_width[1]+char_width(f)(char_info(f)(character(s)));
- at y
-  break_width[1]:=@|break_width[1]+char_width(f)(char_info(f)(character(s)));
-  if (pdf_adjust_spacing > 1) and check_expand_pars(f) then begin
-      prev_char_p := s;
-      add_char_stretch(break_width[7])(character(s));
-      add_char_shrink(break_width[8])(character(s));
-  end;
- at z
-
- at x [842] - font expansion
-    break_width[1]:=break_width[1]+
-      char_width(f)(char_info(f)(character(lig_char(s))));
- at y
-    break_width[1]:=break_width[1]+
-      char_width(f)(char_info(f)(character(lig_char(s))));
-    if (pdf_adjust_spacing > 1) and check_expand_pars(f) then begin
-        prev_char_p := s;
-        add_char_stretch(break_width[7])(character(lig_char(s)));
-        add_char_shrink(break_width[8])(character(lig_char(s)));
-    end;
- at z
-
- at x [842] - font expansion
-  hlist_node,vlist_node,rule_node,kern_node:
-    break_width[1]:=break_width[1]+width(s);
- at y
-  hlist_node,vlist_node,rule_node,kern_node: begin
-    break_width[1]:=break_width[1]+width(s);
-    if (type(s) = kern_node) and
-       (pdf_adjust_spacing > 1) and (subtype(s) = normal)
-    then begin
-        add_kern_stretch(break_width[7])(s);
-        add_kern_shrink(break_width[8])(s);
-    end;
-  end;
- at z
-
- at x [843] - font expansion
-  begin do_all_six(convert_to_break_width);
- at y
-  begin do_all_eight(convert_to_break_width);
- at z
-
- at x [843] - font expansion
-  begin do_all_six(store_break_width);
- at y
-  begin do_all_eight(store_break_width);
- at z
-
- at x [843] - font expansion
-  do_all_six(new_delta_to_break_width);
- at y
-  do_all_eight(new_delta_to_break_width);
- at z
-
- at x [844] - font expansion
-  do_all_six(new_delta_from_break_width);
- at y
-  do_all_eight(new_delta_from_break_width);
- at z
-
- at x [851] - font expansion, margin kerning
-shortfall:=line_width-cur_active_width[1]; {we're this much too short}
- at y
-shortfall:=line_width-cur_active_width[1]; {we're this much too short}
-
-{|
-if pdf_output > 2 then begin
-print_ln;
-if (r <> null) and (break_node(r) <> null) then
-    short_display_n(cur_break(break_node(r)), 5);
-print_ln;
-short_display_n(cur_p, 5);
-print_ln;
-end;
-|}
-
-if pdf_protrude_chars > 1 then
-    shortfall := shortfall + total_pw(r, cur_p);
-if (pdf_adjust_spacing > 1) and (shortfall <> 0) then begin
-    margin_kern_stretch := 0;
-    margin_kern_shrink := 0;
-    if pdf_protrude_chars > 1 then 
-        @<Calculate variations of marginal kerns@>;
-    if (shortfall > 0) and ((total_font_stretch + margin_kern_stretch) > 0) 
-    then begin
-        if (total_font_stretch + margin_kern_stretch) > shortfall then
-            shortfall := ((total_font_stretch + margin_kern_stretch) div 
-                          (max_stretch_ratio div cur_font_step)) div 2
-        else
-            shortfall := shortfall - (total_font_stretch + margin_kern_stretch);
-    end
-    else if (shortfall < 0) and ((total_font_shrink + margin_kern_shrink) > 0) 
-    then begin
-        if (total_font_shrink + margin_kern_shrink) > -shortfall then
-            shortfall := -((total_font_shrink + margin_kern_shrink) div 
-                           (max_shrink_ratio div cur_font_step)) div 2
-        else
-            shortfall := shortfall + (total_font_shrink + margin_kern_shrink);
-    end;
-end;
- at z
-
- at x [860] - font expansion
-    begin do_all_six(downdate_width);
- at y
-    begin do_all_eight(downdate_width);
- at z
-
- at x [860] - font expansion
-    begin do_all_six(update_width);
-    do_all_six(combine_two_deltas);
- at y
-    begin do_all_eight(update_width);
-    do_all_eight(combine_two_deltas);
- at z
-
- at x [861] - font expansion
-  begin do_all_six(update_active);
-  do_all_six(copy_to_cur_active);
- at y
-  begin do_all_eight(update_active);
-  do_all_eight(copy_to_cur_active);
- at z
-
- at x [862] - margin kerning, avoiding overfull boxes
-@!auto_breaking:boolean; {is node |cur_p| outside a formula?}
-@!prev_p:pointer; {helps to determine when glue nodes are breakpoints}
- at y
- at z
-
- at x [863] - margin kerning, avoiding overfull boxes
-  while (cur_p<>null)and(link(active)<>last_active) do
- at y
-  prev_char_p := null;
-  prev_legal := null;
-  rejected_cur_p := null;
-  try_prev_break := false;
-  before_rejected_cur_p := false;
-  first_p := cur_p; {to access the first node of paragraph as the first active
-                     node has |break_node=null|}
-  while (cur_p<>null)and(link(active)<>last_active) do
- at z
-
- at x [864] - font expansion
-do_all_six(store_background);@/
- at y
-do_all_eight(store_background);@/
- at z
-
- at x [666] - font expansion
-  else act_width:=act_width+width(cur_p);
- at y
-  else begin
-    act_width:=act_width+width(cur_p);
-    if (pdf_adjust_spacing > 1) and (subtype(cur_p) = normal) then begin
-        add_kern_stretch(active_width[7])(cur_p);
-        add_kern_shrink(active_width[8])(cur_p);
-    end;
-  end;
- at z
-
- at x [866] - font expansion
-  act_width:=act_width+char_width(f)(char_info(f)(character(lig_char(cur_p))));
- at y
-  act_width:=act_width+char_width(f)(char_info(f)(character(lig_char(cur_p))));
-  if (pdf_adjust_spacing > 1) and check_expand_pars(f) then begin
-      prev_char_p := cur_p;
-      add_char_stretch(active_width[7])(character(lig_char(cur_p)));
-      add_char_shrink(active_width[8])(character(lig_char(cur_p)));
-  end;
- at z
-
- at x [867] - font expansion
-act_width:=act_width+char_width(f)(char_info(f)(character(cur_p)));
- at y
-act_width:=act_width+char_width(f)(char_info(f)(character(cur_p)));
-if (pdf_adjust_spacing > 1) and check_expand_pars(f) then begin
-    prev_char_p := cur_p;
-    add_char_stretch(active_width[7])(character(cur_p));
-    add_char_shrink(active_width[8])(character(cur_p));
-end;
- at z
-
- at x [869] - font expansion
-begin s:=pre_break(cur_p); disc_width:=0;
- at y
-begin s:=pre_break(cur_p);
-do_one_seven_eight(reset_disc_width);
- at z
-
- at x [869] - font expansion
-  act_width:=act_width+disc_width;
-  try_break(hyphen_penalty,hyphenated);
-  act_width:=act_width-disc_width;
- at y
-  do_one_seven_eight(add_disc_width_to_active_width);
-  try_break(hyphen_penalty,hyphenated);
-  do_one_seven_eight(sub_disc_width_from_active_width);
- at z
-
- at x [870] - font expansion
-  disc_width:=disc_width+char_width(f)(char_info(f)(character(s)));
- at y
-  disc_width[1]:=disc_width[1]+char_width(f)(char_info(f)(character(s)));
-  if (pdf_adjust_spacing > 1) and check_expand_pars(f) then begin
-      prev_char_p := s;
-      add_char_stretch(disc_width[7])(character(s));
-      add_char_shrink(disc_width[8])(character(s));
-  end;
- at z
-
- at x [870] - font expansion
-    disc_width:=disc_width+
-      char_width(f)(char_info(f)(character(lig_char(s))));
- at y
-    disc_width[1]:=disc_width[1]+
-      char_width(f)(char_info(f)(character(lig_char(s))));
-    if (pdf_adjust_spacing > 1) and check_expand_pars(f) then begin
-        prev_char_p := s;
-        add_char_stretch(disc_width[7])(character(lig_char(s)));
-        add_char_shrink(disc_width[8])(character(lig_char(s)));
-    end;
- at z
-
- at x [870] - font expansion
-  hlist_node,vlist_node,rule_node,kern_node:
-    disc_width:=disc_width+width(s);
- at y
-  hlist_node,vlist_node,rule_node,kern_node: begin
-    disc_width[1]:=disc_width[1]+width(s);
-    if (type(s) = kern_node) and
-       (pdf_adjust_spacing > 1) and (subtype(s) = normal)
-    then begin
-        add_kern_stretch(disc_width[7])(s);
-        add_kern_shrink(disc_width[8])(s);
-    end;
-  end;
- at z
-
- at x [871] - font expansion
-  act_width:=act_width+char_width(f)(char_info(f)(character(s)));
- at y
-  act_width:=act_width+char_width(f)(char_info(f)(character(s)));
-  if (pdf_adjust_spacing > 1) and check_expand_pars(f) then begin
-      prev_char_p := s;
-      add_char_stretch(active_width[7])(character(s));
-      add_char_shrink(active_width[8])(character(s));
-  end;
- at z
-
- at x [871] - font expansion
-    act_width:=act_width+
-      char_width(f)(char_info(f)(character(lig_char(s))));
- at y
-    act_width:=act_width+
-      char_width(f)(char_info(f)(character(lig_char(s))));
-    if (pdf_adjust_spacing > 1) and check_expand_pars(f) then begin
-        prev_char_p := s;
-        add_char_stretch(active_width[7])(character(lig_char(s)));
-        add_char_shrink(active_width[8])(character(lig_char(s)));
-    end;
- at z
-
- at x [671] - font expansion
-  hlist_node,vlist_node,rule_node,kern_node:
-    act_width:=act_width+width(s);
- at y
-  hlist_node,vlist_node,rule_node,kern_node: begin
-    act_width:=act_width+width(s);
-    if (type(s) = kern_node) and
-       (pdf_adjust_spacing > 1) and (subtype(s) = normal)
-    then begin
-        add_kern_stretch(active_width[7])(s);
-        add_kern_shrink(active_width[8])(s);
-    end;
-  end;
- at z
-
- at x [877] - margin kerning
-var q,@!r,@!s:pointer; {temporary registers for list manipulation}
- at y
-var q,@!r,@!s:pointer; {temporary registers for list manipulation}
-    p, k: pointer; 
-    w: scaled;
-    glue_break: boolean; {was a break at glue?}
-    ptmp: pointer;
- at z
-
- at x [881] - margin kerning
-q:=cur_break(cur_p); disc_break:=false; post_disc_break:=false;
- at y
-q:=cur_break(cur_p); disc_break:=false; post_disc_break:=false;
-glue_break := false;
- at z
-
- at x [881] - margin kerning
-    subtype(q):=right_skip_code+1; add_glue_ref(right_skip);
-    goto done;
- at y
-    subtype(q):=right_skip_code+1; add_glue_ref(right_skip);
-    glue_break := true;
-    goto done;
- at z
-
- at x [881] - margin kerning
-@<Put the \(r)\.{\\rightskip} glue after node |q|@>;
-done:
- at y
-done:
-
-{at this point |q| is the rightmost breakpoint; the only exception is the case
-of a discretionary break with non-empty |pre_break|, then |q| has been changed
-to the last node of the |pre_break| list}
-
-if pdf_protrude_chars > 0 then begin
-    if disc_break and (is_char_node(q) or (type(q) <> disc_node))
-    {|q| has been reset to the last node of |pre_break|}
-    then begin
-        p := q;
-        ptmp := p;
-    end else begin
-        p := prev_rightmost(temp_head, q); {get |link(p) = q|}
-        ptmp := p;
-        p := find_protchar_right(temp_head, p);
-    end;
-    {|
-    short_display_n(p, 1);
-    print_ln;
-    |}
-    w := right_pw(p);
-    if w <> 0 then {we have found a marginal kern, append it after |ptmp|}
-    begin
-        k := new_margin_kern(-w, last_rightmost_char, right_side);
-        link(k) := link(ptmp);
-        link(ptmp) := k;
-        if (ptmp = q) then
-            q := link(q);
-    end;
-end;
-
-{if |q| was not a breakpoint at glue and has been reset to |rightskip| then
- we append |rightskip| after |q| now}
-if not glue_break then begin
-    @<Put the \(r)\.{\\rightskip} glue after node |q|@>;
-end;
- at z
-
- at x [887] - margin kerning
-if left_skip<>zero_glue then
- at y
-{at this point |q| is the leftmost node; all discardable nodes have been discarded}
-if pdf_protrude_chars > 0 then begin
-    p := q;
-    p := find_protchar_left(p, false); {no more discardables}
-    w := left_pw(p);
-    if w <> 0 then begin
-        k := new_margin_kern(-w, last_leftmost_char, left_side);
-        link(k) := q;
-        q := k;
-    end;
-end;
-if left_skip<>zero_glue then
- at z
-
- at x [889] - font expansion, pre vadjust
-just_box:=hpack(q,cur_width,exactly);
- at y
-if pdf_adjust_spacing > 0 then
-    just_box := hpack(q, cur_width, cal_expand_ratio)
-else
-    just_box := hpack(q, cur_width, exactly);
- at z
-
-% @x [1110] - margin kerning
-% var p:pointer; {the box}
-% @y
-% var p:pointer; {the box}
-%     r: pointer; {to remove marginal kern nodes}
-% @z
-% 
-% @x [1110] - margin kerning
-% while link(tail)<>null do tail:=link(tail);
-% @y
-% if c = copy_code then begin
-%     while link(tail)<>null do tail:=link(tail);
-% end
-% else while link(tail) <> null do begin
-%     r := link(tail);
-%     if not is_char_node(r) and (type(r) = margin_kern_node) then begin
-%         link(tail) := link(r);
-%         free_avail(margin_char(r));
-%         free_node(r, margin_kern_node_size);
-%     end;
-%     tail:=link(tail);
-% end;
-% @z
-
- at x [1147] - margin kerning
-ligature_node:@<Make node |p| look like a |char_node|...@>;
- at y
-ligature_node:@<Make node |p| look like a |char_node|...@>;
-margin_kern_node: d:=width(p);
- at z
-
- at x [1253] - font expansion
-assign_font_int: begin n:=cur_chr; scan_font_ident; f:=cur_val;
-  scan_optional_equals; scan_int;
-  if n=0 then hyphen_char[f]:=cur_val at +else skew_char[f]:=cur_val;
-  end;
- at y
-assign_font_int: begin n:=cur_chr; scan_font_ident; f:=cur_val;
-  if n < lp_code_base then begin
-    scan_optional_equals; scan_int;
-    if n=0 then hyphen_char[f]:=cur_val at +else skew_char[f]:=cur_val;
-  end
-  else begin
-    scan_char_num; p := cur_val;
-    scan_optional_equals; scan_int;
-    case n of 
-    lp_code_base: set_lp_code(f, p, cur_val);
-    rp_code_base: set_rp_code(f, p, cur_val);
-    ef_code_base: set_ef_code(f, p, cur_val);
-    end;
-  end;
-end;
- at z
-
- at x [1254] - font expansion
-primitive("skewchar",assign_font_int,1);
-@!@:skew_char_}{\.{\\skewchar} primitive@>
- at y
-primitive("skewchar",assign_font_int,1);
-@!@:skew_char_}{\.{\\skewchar} primitive@>
-primitive("lpcode",assign_font_int,lp_code_base);
-@!@:lp_code_}{\.{\\lpcode} primitive@>
-primitive("rpcode",assign_font_int,rp_code_base);
-@!@:rp_code_}{\.{\\rpcode} primitive@>
-primitive("efcode",assign_font_int,ef_code_base);
-@!@:ef_code_}{\.{\\efcode} primitive@>
- at z
-
- at x [1255] - font expansion
-assign_font_int: if chr_code=0 then print_esc("hyphenchar")
-  else print_esc("skewchar");
- at y
-assign_font_int: case chr_code of
-0: print_esc("hyphenchar");
-1: print_esc("skewchar");
-lp_code_base: print_esc("lpcode");
-rp_code_base: print_esc("rpcode");
-ef_code_base: print_esc("efcode");
-endcases;
- at z
-
- at x [1344]
- at d pdftex_last_extension_code  == pdftex_first_extension_code + 23
- at y
- at d pdf_font_expand_code        == pdftex_first_extension_code + 24
- at d pdftex_last_extension_code  == pdftex_first_extension_code + 24
- at z
-
- at x [1344]
-primitive("setlanguage",extension,set_language_code);@/
-@!@:set_language_}{\.{\\setlanguage} primitive@>
- at y
-primitive("setlanguage",extension,set_language_code);@/
-@!@:set_language_}{\.{\\setlanguage} primitive@>
-primitive("pdffontexpand",extension,pdf_font_expand_code);@/
-@!@:pdf_font_expand_}{\.{\\pdffontexpand} primitive@>
- at z
-
- at x [1346]
-  immediate_code:print_esc("immediate");
-  set_language_code:print_esc("setlanguage");
- at y
-  immediate_code:print_esc("immediate");
-  set_language_code:print_esc("setlanguage");
-  pdf_font_expand_code: print_esc("pdffontexpand");
- at z
-
- at x [1348]
-set_language_code:@<Implement \.{\\setlanguage}@>;
- at y
-set_language_code:@<Implement \.{\\setlanguage}@>;
-pdf_font_expand_code: @<Implement \.{\\pdffontexpand}@>;
- at z
-
- at x [1354]
-@<Implement \.{\\special}@>=
-begin new_whatsit(special_node,write_node_size); write_stream(tail):=null;
-p:=scan_toks(false,true); write_tokens(tail):=def_ref;
-end
- at y
-@<Implement \.{\\special}@>=
-begin new_whatsit(special_node,write_node_size); write_stream(tail):=null;
-p:=scan_toks(false,true); write_tokens(tail):=def_ref;
-end
-
-@ @<Implement \.{\\pdffontexpand}@>= 
-    read_expand_font
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/misc.ch
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/misc.ch	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/misc.ch	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,21 +0,0 @@
-% WEB change file containing miscellany extensions for pdfTeX 
-%
-% Copyright (c) 1996-2002 Han Th\^e\llap{\raise 0.5ex\hbox{\'{}}} Th\`anh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: //depot/Build/source.development/TeX/texk/web2c/pdftexdir/misc.ch#5 $

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/pdftex-syntax.txt
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/pdftex-syntax.txt	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/pdftex-syntax.txt	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,136 +0,0 @@
-%% This is the list of new or extended primitives provided by pdftex.
-%% Don't edit this file, as it is now auto-generated from the
-%% pdfTeX documentation file pdftex.tex by script syntaxform.awk.
-%% Used convention for syntax rules is borrowed from `TeXbook naruby'
-%% by Petr Olsak.
-%% $Id: //depot/Build/source.development/TeX/texk/web2c/pdftexdir/pdftex-syntax.txt#17 $
-
-%% integer registers:
-\pdfoutput                                              (integer)
-\pdfadjustspacing                                       (integer)
-\pdfcompresslevel                                       (integer)
-\pdfdecimaldigits                                       (integer)
-\pdfmovechars                                           (integer)
-\pdfimageresolution                                     (integer)
-\pdfpkresolution                                        (integer)
-\pdfuniqueresname                                       (integer)
-\pdfprotrudechars                                       (integer)
-\pdfoptionpdfminorversion                               (integer)
-\pdfoptionalwaysusepdfpagebox                           (integer)
-\pdfoptionpdfinclusionerrorlevel                        (integer)
-
-%% dimen registers:
-\pdfhorigin                                             (dimen)
-\pdfvorigin                                             (dimen)
-\pdfpagewidth                                           (dimen)
-\pdfpageheight                                          (dimen)
-\pdflinkmargin                                          (dimen)
-\pdfdestmargin                                          (dimen)
-\pdfthreadmargin                                        (dimen)
-
-%% token registers:
-\pdfpagesattr                                           (tokens)
-\pdfpageattr                                            (tokens)
-\pdfpageresources                                       (tokens)
-
-%% expandable commands:
-\pdftexrevision                                         (expandable)
-\pdftexbanner                                           (expandable)
-\pdffontname <font>                                     (expandable)
-\pdffontobjnum <font>                                   (expandable)
-\pdfincludechars <font> <general text>                  (expandable)
-
-%% read-only integers:
-\pdftexversion                                          (read-only integer)
-\pdflastobj                                             (read-only integer)
-\pdflastxform                                           (read-only integer)
-\pdflastximage                                          (read-only integer)
-\pdflastximagepages                                     (read-only integer)
-\pdflastannot                                           (read-only integer)
-\pdflastxpos                                            (read-only integer)
-\pdflastypos                                            (read-only integer)
-\pdflastdemerits                                        (read-only integer)
-\pdflastvbreakpenalty                                   (read-only integer)
-
-%% general commands:
-\pdfliteral [direct] <general text>                     (h, v, m)
-\pdfobj <object type spec>                              (h, v, m)
-\pdfrefobj <object number>                              (h, v, m)
-\pdfxform [<xform attr spec>] <box number>              (h, v, m)
-\pdfrefxform <object number>                            (h, v, m)
-\pdfximage [<image attr spec>] <general text>           (h, v, m)
-\pdfrefximage <object number>                           (h, v, m)
-\pdfannot [<rule spec>] <general text>                  (h, v, m)
-\pdfstartlink [<rule spec>] [<attr spec>] <action spec> (h, m)
-\pdfendlink                                             (h, m)
-\pdfoutline <outline spec>                              (h, v, m)
-\pdfdest <dest spec>                                    (h, v, m)
-\pdfthread <thread spec>                                (h, v, m)
-\pdfstartthread <thread spec>                           (v, m)
-\pdfendthread                                           (v, m)
-\pdfsavepos                                             (h, v, m)
-\pdfinfo <general text>
-\pdfcatalog <general text> [<open-action spec>]
-\pdfnames <general text>
-\pdfmapfile <map spec>
-\pdfmapline <map spec>
-\pdffontattr <font> <general text>
-\pdftrailer <general text>
-\pdffontexpand <font> <expand spec>
-\efcode <font> <8-bit number>                           (integer)
-\lpcode <font> <8-bit number>                           (integer)
-\rpcode <font> <8-bit number>                           (integer)
-\vadjust <pre spec> <filler> { <vertical material> }    (h, m)
-\special <pdfspecial spec>
-
-%% syntax rules:
-<general text> --> { <balanced text> }
-<attr spec> --> attr <general text>
-<rule spec> --> (width | height | depth) <dimension> [<rule spec>]
-<object type spec> --> reserveobjnum
-                     | [useobjnum <number>] [<attr spec>] [stream [<attr spec>]] <object contents>
-<object contents> --> <file spec>
-                    | <general text>
-<xform attr spec> --> [<attr spec>] [<resources spec>]
-<resources spec> --> resources <general text>
-<image attr spec> --> [<rule spec>] [<attr spec>] [<page spec>] [<pdf box spec>]
-<outline spec> --> <attr spec> <action spec> [count <number>] <general text>
-<action spec> --> user <user-action spec>
-                | goto <goto-action spec>
-                | thread <thread-action spec>
-<user-action spec> --> <general text>
-<goto-action spec> --> <numid>
-                     | [<file spec>] <nameid>
-                     | [<file spec>] [<page spec>] <general text>
-                     | <file spec> <nameid> <newwindow spec>
-                     | <file spec> [<page spec>] <general text> <newwindow spec>
-<thread-action spec> --> [<file spec>] <numid>
-                       | [<file spec>] <nameid>
-<open-action spec> --> openaction <action spec>
-<pdf box spec> --> mediabox | cropbox | bleedbox | trimbox | artbox
-<map spec> --> { [<map modifier>] <balanced text> }
-<map modifier> --> + | = | -
-<numid> --> num <number>
-<nameid> --> name <general text>
-<newwindow spec> --> newwindow | nonewwindow
-<dest spec> --> <numid> <dest type>
-              | <nameid> <dest type>
-<dest type> --> xyz [zoom <number>]
-              | fitr <rule spec>
-              | fitbh
-              | fitbv
-              | fitb
-              | fith
-              | fitv
-              | fit
-<thread spec> --> [<rule spec>] [<attr spec>] <id spec>
-<id spec> --> <numid> | <nameid>
-<file spec> --> file <general text>
-<page spec> --> page <number>
-<expand spec> --> <stretch> <shrink> <step> [autoexpand]
-<stretch> --> <number>
-<shrink> --> <number>
-<step> --> <number>
-<pdfspecial spec> --> { [<pdfspecial id> [<pdfspecial modifier>]] <balanced text> }
-<pdfspecial id> --> pdf: | PDF:
-<pdfspecial modifier> --> direct:

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/pdftex.mak
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/pdftex.mak	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/pdftex.mak	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,199 +0,0 @@
-################################################################################
-#
-# Makefile  : pdftex, web2c win32.mak fragment to build pdfTeX
-# Author    : Fabrice Popineau <Fabrice.Popineau at supelec.fr>
-# Platform  : Win32, Microsoft VC++ 6.0, depends upon fpTeX 0.5 sources
-# Time-stamp: <04/03/20 16:40:35 popineau>
-#
-################################################################################
-
-# The libraries are not mentioned.  As the matter stands, a change in their
-# number or how they are configured requires changes to the main distribution
-# anyway.
-
-Makefile: pdftexdir\pdftex.mk
-
-pdftex_bin = $(objdir)\pdftex.exe $(objdir)\pdfetex.exe $(objdir)\pdfxtex.exe $(objdir)\ttf2afm.exe $(objdir)\pdftosrc.exe
-# pdftex_exe = pdftex.exe pdfetex.exe pdfxtex.exe ttf2afm.exe pdftosrc.exe
-pdftex_pool = pdftex.pool pdfetex.pool pdfxtex.pool
-# linux_build_dir = $(HOME)\pdftex\build\linux\texk\web2c
-
-# We build pdftex
-pdftex = $(objdir)\pdftex.exe
-!ifdef TEX_DLL
-pdftex = $(pdftex) $(objdir)\$(library_prefix)pdftex.dll
-!endif
-
-# The C sources.
-pdftex_c = pdftex.c
-pdftex_o = $(objdir)\pdftex.obj
-
-# Making pdftex
-!ifdef TEX_DLL
-$(objdir)\$(library_prefix)pdftex.exp: $(objdir)\$(library_prefix)pdftex.lib
-
-$(objdir)\$(library_prefix)pdftex.lib: $(pdftex_o)
-	$(archive) /DEF $(pdftex_o)
-
-$(objdir)\$(library_prefix)pdftex.dll: $(pdftex_o) $(objdir)\$(library_prefix)pdftex.exp $(objdir)\pdftex.res $(pdftexlibs) $(kpathsealib) $(proglib)
-	$(link_dll) $(**) $(socketlibs) $(conlibs)
-
-$(objdir)\pdftex.exe: $(objdir)\win32main.obj $(objdir)\$(library_prefix)pdftex.lib $(kpathsealib) $(proglib)
-	$(link) $(**) $(conlibs)
-!else
-$(objdir)\pdftex.exe: $(pdftex_o) $(objdir)\win32main.obj $(objdir)\pdftex.res $(pdftexlibs) $(kpathsealib) $(proglib)
-	$(link) $(**) $(socketlibs) $(conlibs)
-!endif
-
-# C file dependencies.
-$(pdftex_c) pdftexcoerce.h pdftexd.h: pdftex.p $(web2c_texmf)
-	$(web2c) pdftex
-
-# Tangling.
-pdftex.p pdftex.pool: .\$(objdir)\tangle.exe pdftex.web pdftex.ch
-	.\$(objdir)\tangle pdftex.web pdftex.ch
-
-# Generation of the web and ch files.
-pdftex.web: $(objdir)\tie.exe \
-	tex.web \
-        pdftexdir/pdftex.ch \
-        pdftexdir/hz.ch \
-        pdftexdir/misc.ch \
-	# pdftexdir\pdftex.mak
-	.\$(objdir)\tie -m pdftex.web tex.web \
-	pdftexdir\pdftex.ch \
-	$(srcdir)/pdftexdir/hz.ch  \
-	$(srcdir)/pdftexdir/misc.ch
-
-pdftex.ch: $(objdir)\tie.exe pdftex.web	\
-	   pdftexdir\tex.ch0		\
-	   tex.ch			\
-	   tex-supp-w32.ch		\
-	   pdftexdir\tex.ch1		\
-	   pdftexdir\tex.pch		\
-	   pdftexdir\tex.ch2
-#	   pdftexdir\pdftex.mak
-	.\$(objdir)\tie -c pdftex.ch    \
-	   pdftex.web 			\
-	   $(srcdir)\pdftexdir\tex.ch0	\
-	   tex.ch			\
-	   tex-supp-w32.ch		\
-	   $(srcdir)\pdftexdir\tex.ch1	\
-	   $(srcdir)\pdftexdir\tex.pch	\
-	   $(srcdir)\pdftexdir\tex.ch2
-
-# Tests...
-check: pdftex-check
-pdftex-check: pdftex pdftex.fmt
-
-# Cleaning up.
-clean:: pdftex-clean
-pdftex-clean:
-#	$(LIBTOOL) --mode=clean $(RM) pdftex
-	- at echo $(verbose) & ( \
-		for %%i in ($(pdftex_o) $(pdftex_c) pdftexextra.c pdftexcoerce.h \
-			    pdftexd.h pdftex.p pdftex.pool pdftex.web pdftex.ch \
-                            pdftex.fmt pdftex.log) do $(del) %%i $(redir_stderr) \
-	)
-
-# Dumps.
-# all_pdffmts = pdftex.fmt $(pdffmts)
-
-# dumps: pdffmts
-# pdffmts: $(all_pdffmts)
-# pdftex.fmt: $(pdftex)
-# 	$(dumpenv) $(make) progname=pdftex files="plain.tex cmr10.tfm" prereq-check
-# 	$(dumpenv) .\$(objdir)\pdftex --progname=pdftex --jobname=pdftex --ini "\pdfoutput=1 \input plain \dump" <nul
-# 
-# pdfolatex.fmt: $(pdftex)
-# 	$(dumpenv) $(make) progname=pdfolatex files="latex.ltx" prereq-check
-# 	$(dumpenv) .\$(objdir)\pdftex --progname=pdfolatex --jobname=pdfolatex --ini "\pdfoutput=1 \input latex.ltx" <nul
-# 
-# pdflatex.fmt: $(pdftex)
-# 	$(dumpenv) $(make) progname=pdflatex files="latex.ltx" prereq-check
-# 	$(dumpenv) .\$(objdir)\pdftex --progname=pdflatex --jobname=pdflatex --ini "\pdfoutput=1 \input latex.ltx" <nul
-# 
-# 
-# Installation.
-install-pdftex: install-pdftex-exec install-pdftex-data
-install-pdftex-exec: install-pdftex-links
-# install-pdftex-data: install-pdftex-dumps
-install-pdftex-dumps: install-pdftex-fmts
-
-# The actual binary executables and pool files.
-install-programs: install-pdftex-programs
-install-pdftex-programs: $(pdftex) $(bindir)
-	- at echo $(verbose) & ( \
-	  for %%p in ($(pdftex)) do $(copy) %%p $(bindir) \
-	) $(redir_stdout)
-
-# install-links: install-pdftex-links
-install-pdftex-links: install-pdftex-programs
-# 	- at echo $(verbose) & ( \
-# 	  pushd $(bindir) & \
-# 	    $(del) .\pdfinitex.exe .\pdfvirtex.exe & \
-# 	    $(lnexe) .\pdftex.exe $(bindir)\pdfinitex.exe & \
-# 	    $(lnexe) .\pdftex.exe $(bindir)\pdfvirtex.exe & \
-# 	 popd \
-# 	) $(redir_stdout)
-	- at echo $(verbose) & ( \
-	  if not "$(pdffmts)"=="" \
-	    for %%i in ($(pdffmts)) do \
-              pushd $(bindir) & \
-                $(del) .\%%~ni.exe & \
-	        $(lnexe) .\pdftex.exe $(bindir)\%%~ni.exe & \
-	      popd \
-	) $(redir_stdout)
-
-# install-fmts: install-pdftex-fmts
-install-pdftex-fmts: pdffmts $(fmtdir)
-	- at echo $(verbose) & ( \
-	  for %%f in ($(all_pdffmts)) \
-	    do $(copy) %%f $(fmtdir)\%%f \
-	) $(redir_stdout)
-
-# Auxiliary files.
-install-data:: install-pdftex-data
-install-pdftex-data: $(texpooldir)
-	@$(copy) pdftex.pool $(texpooldir)\pdftex.pool $(redir_stdout)
-
-# 
-# ttf2afm
-ttf2afm = $(objdir)\ttf2afm.exe
-
-$(objdir)\ttf2afm.exe: $(objdir)\ttf2afm.obj
-	$(link) $(**) $(kpathsealib) $(proglib) $(conlibs)
-
-$(objdir)\ttf2afm.obj: pdftexdir\ttf2afm.c pdftexdir\macnames.c
-	$(compile) -I.\pdftexdir pdftexdir\ttf2afm.c
-check: ttf2afm-check
-ttf2afm-check: $(objdir)\ttf2afm.exe
-clean:: ttf2afm-clean
-ttf2afm-clean:
-#	$(LIBTOOL) --mode=clean $(RM) ttf2afm
-	- at echo $(verbose) & ( \
-		for %%i in ($(objdir)\ttf2afm.obj $(objdir)\macnames.obj \
-			    ttf2afm.c macnames.c) do $(del) %%i $(redir_stderr) \
-	)
-# 
-# pdftosrc
-pdftosrc = $(objdir)\pdftosrc.exe
-
-$(objdir)\pdftosrc.exe: $(objdir)\pdftosrc.obj $(xpdflib)
-	$(link) $(objdir)\pdftosrc.obj $(xpdflib) $(kpathsealib) $(proglib) $(conlibs)
-
-$(objdir)\pdftosrc.obj: pdftexdir\pdftosrc.cc
-	$(compile) /Tp $(**)
-check: pdftosrc-check
-pdftosrc-check: $(objdir)\pdftosrc.exe
-clean:: pdftosrc-clean
-pdftosrc-clean:
-#	$(LIBTOOL) --mode=clean $(RM) pdftosrc
-	-@$(del) $(objdir)\pdftosrc.obj $(redir_stderr)
-
-# end of pdftex.mak
-#  
-# Local variables:
-# page-delimiter: "^# \f"
-# mode: Makefile
-# End:

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/tex.ch1
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/tex.ch1	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/tex.ch1	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,39 +0,0 @@
-%
-% Copyright (c) 1996-2002 Han The Thanh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: //depot/Build/source.development/TeX/texk/web2c/pdftexdir/tex.ch1#11 $
-%
-% Change file to assist in creating the web2c-specific change file.
-% This one resolves inconsistencies between tex.ch and tex.pch.
-
- at x [1] m.2 l.188 - banner
- at d banner==TeX_banner
- at d banner_k==TeX_banner_k
- at y
- at d banner==pdfTeX_banner
- at d banner_k==pdfTeX_banner_k
- at z
-
- at x [17.236] l.4960 - first web2c, then pdfTeX additional integer parameters
- at d int_pars=web2c_int_pars {total number of integer parameters}
-@#
- at d pdftex_first_integer_code = tex_int_pars {base for \pdfTeX's integer parameters}
- at y
- at d pdftex_first_integer_code = web2c_int_pars {base for \pdfTeX's integer parameters}
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/tex.ch2
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/tex.ch2	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/tex.ch2	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,23 +0,0 @@
-%
-% Copyright (c) 1996-2002 Han The Thanh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: //depot/Build/source.development/TeX/texk/web2c/pdftexdir/tex.ch2#6 $
-%
-% Change file to assist in creating the web2c-specific change file.
-% This one comes last.

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/tex.pch
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/tex.pch	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/tex.pch	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,391 +0,0 @@
-% Copyright (c) 1996-2002 Han Th\^e\llap{\raise 0.5ex\hbox{\'{}}} Th\`anh, <thanh at pdftex.org>
-%
-% Note: This file, pdftexdir/tex.pch, contains the web2c changes for the
-% pdfTeX specific part of pdftex.web (defined in pdftexdir/pdftex.ch)
-% and is used as follows to construct the web2c change file for pdfTeX:
-%
-%	pdftexdir/tex.ch0	)
-%	   +			)
-%	tex.ch			)
-%	   +			)   =>   tie -c ...   =>   pdftex.ch
-%	pdftexdir/tex.ch1	)
-%	   +			)
-%	pdftexdir/tex.pch	)
-%
-% In addition, this file is used to construct the web2c change file
-% for pdfeTeX:
-%
-%	pdfetexdir/tex.ch0	)
-%	   +			)
-%	tex.ch			)
-%	   +			)
-%	etexdir/tex.ch1		)
-%	   +			)   =>   tie -c ...   =>   pdfetex.ch
-%	etexdir/tex.ech		)
-%	   +			)
-%	pdfetexdir/tex.ch1	)
-%	   +			)
-%	pdftexdir/tex.pch	)
-%
-% where the four (small) files pdf{,e}texdir/tex.ch[01] take care
-% of interferences between web2c, e-Tex, pdfTeX changes.
-% Consequently, changes in all these files have to be coordinated.
-
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: //depot/Build/source.development/TeX/texk/web2c/pdftexdir/tex.pch#23 $
-% Change file containing web2c-specific or system-dependent changes to
-% pdftex
-
- at x [1] m.2 l.188 - Web2C: extensions imply we're not pdfTeX
- at d pdfTeX_banner=='This is pdfTeX, Version 3.141592',pdftex_version_string
- at y
- at d pdfTeX_banner_k=='This is pdfTeXk, Version 3.141592',pdftex_version_string
- at d pdfTeX_banner=='This is pdfTeX, Version 3.141592',pdftex_version_string
- at z
-
- at x (MLTeX)
- at d is_valid_char(#)==((font_bc[f] <= #) and (# <= font_ec[f]) and 
-                      char_exists(char_info(f)(#)))
- at y
- at d is_valid_char(#)==((font_bc[f] <= #) and (# <= font_ec[f]) and 
-                      char_exists(orig_char_info(f)(#)))
- at z
-
- at x (MLTeX)
-function get_charwidth(f: internal_font_number; c: eight_bits): scaled;
-begin
-    if is_valid_char(c) then
-        get_charwidth := char_width(f)(char_info(f)(c))
-    else
-        get_charwidth := 0;
-end;
-
-function get_charheight(f: internal_font_number; c: eight_bits): scaled;
-begin
-    if is_valid_char(c) then
-        get_charheight := char_height(f)(height_depth(char_info(f)(c)))
-    else
-        get_charheight := 0;
-end;
-
-function get_chardepth(f: internal_font_number; c: eight_bits): scaled;
-begin
-    if is_valid_char(c) then
-        get_chardepth := char_depth(f)(height_depth(char_info(f)(c)))
-    else
-        get_chardepth := 0;
-end;
- at y
-function get_charwidth(f: internal_font_number; c: eight_bits): scaled;
-begin
-    if is_valid_char(c) then
-        get_charwidth := char_width(f)(orig_char_info(f)(c))
-    else
-        get_charwidth := 0;
-end;
-
-function get_charheight(f: internal_font_number; c: eight_bits): scaled;
-begin
-    if is_valid_char(c) then
-        get_charheight := char_height(f)(height_depth(orig_char_info(f)(c)))
-    else
-        get_charheight := 0;
-end;
-
-function get_chardepth(f: internal_font_number; c: eight_bits): scaled;
-begin
-    if is_valid_char(c) then
-        get_chardepth := char_depth(f)(height_depth(orig_char_info(f)(c)))
-    else
-        get_chardepth := 0;
-end;
- at z
-
- at x (MLTeX)
-label reswitch, move_past, fin_rule, next_p;
- at y
-label reswitch, move_past, fin_rule, next_p, found, continue;
- at z
-
- at x (MLTeX)
-  if is_valid_char(c) then 
-      output_one_char(c)
-  else
-      char_warning(f, c);
-  cur_h:=cur_h+char_width(f)(char_info(f)(c));
- at y
-  if is_valid_char(c) then begin
-      output_one_char(c);
-      cur_h:=cur_h+char_width(f)(char_info(f)(c));
-      goto continue;
-  end;
-  if mltex_enabled_p then
-    @<(\pdfTeX) Output a substitution, |goto continue| if not possible@>;
-continue:
- at z
-
- at x
-@ The |pdf_vlist_out| routine is similar to |pdf_hlist_out|, but a bit simpler.
- at y
-@ @<(\pdfTeX) Output a substitution, |goto continue| if not possible@>=
-  begin
-  @<Get substitution information, check it, goto |found|
-  if all is ok, otherwise goto |continue|@>;
-found: @<Print character substition tracing log@>;
-  @<(\pdfTeX) Rebuild character using substitution information@>;
-  end
-
-@ @<(\pdfTeX) Rebuild character using substitution information@>=
-  base_x_height:=x_height(f);
-  base_slant:=slant(f)/float_constant(65536);
-@^real division@>
-  accent_slant:=base_slant; {slant of accent character font}
-  base_width:=char_width(f)(ib_c);
-  base_height:=char_height(f)(height_depth(ib_c));
-  accent_width:=char_width(f)(ia_c);
-  accent_height:=char_height(f)(height_depth(ia_c));
-  @/{compute necessary horizontal shift (don't forget slant)}@/
-  delta:=round((base_width-accent_width)/float_constant(2)+
-            base_height*base_slant-base_x_height*accent_slant);
-@^real multiplication@>
-@^real addition@>
-  @/{1. For centering/horizontal shifting insert a kern node.}@/
-  cur_h:=cur_h+delta;
-  @/{2. Then insert the accent character possibly shifted up or down.}@/
-  if ((base_height<>base_x_height) and (accent_height>0)) then
-    begin {the accent must be shifted up or down}
-    cur_v:=base_line+(base_x_height-base_height);
-    output_one_char(accent_c);
-    cur_v:=base_line;
-    end
-  else begin
-    output_one_char(accent_c);
-    end;
-  cur_h:=cur_h+accent_width;
-  @/{3. For centering/horizontal shifting insert another kern node.}@/
-  cur_h:=cur_h+(-accent_width-delta);
-  @/{4. Output the base character.}@/
-  output_one_char(base_c);
-  cur_h:=cur_h+base_width;
-
-@ The |pdf_vlist_out| routine is similar to |pdf_hlist_out|, but a bit simpler.
- at z
-
- at x [49.1259] 
-    begin if s>0 then
-      begin if s=font_size[f] then goto common_ending;
-      end
-    else if font_size[f]=xn_over_d(font_dsize[f],-s,1000) then
-      goto common_ending;
-    end
- at y
-    begin
-    if pdf_font_step[f] = 0 then begin
-       if s>0 then
-         begin if s=font_size[f] then goto common_ending;
-         end
-       else if font_size[f]=xn_over_d(font_dsize[f],-s,1000) then
-         goto common_ending;
-       end
-    end
- at z
-
-
- at x [50.1302] l.23694 - Dump |pdf_output| to fmt file
-@<Dump constants for consistency check@>;
- at y
-@<Dump constants for consistency check@>;
-dump_int(pdf_output);
-dump_int(pdf_compress_level);
-dump_int(pdf_decimal_digits);
-dump_int(pdf_move_chars);
-dump_int(pdf_image_resolution);
-dump_int(pdf_pk_resolution);
-dump_int(pdf_unique_resname);
-dump_int(pdf_option_pdf_minor_version);
-dump_int(pdf_option_always_use_pdfpagebox);
-dump_int(pdf_option_pdf_inclusion_errorlevel);
-dump_int(pdf_h_origin);
-dump_int(pdf_v_origin);
-dump_int(pdf_page_width);
-dump_int(pdf_page_height);
- at z
-
- at x
-begin @<Undump constants for consistency check@>;
- at y
-begin @<Undump constants for consistency check@>;
-undump_int(pdf_output);   {undump |pdf_output| mode flag}
-undump_int(pdf_compress_level);
-undump_int(pdf_decimal_digits);
-undump_int(pdf_move_chars);
-undump_int(pdf_image_resolution);
-undump_int(pdf_pk_resolution);
-undump_int(pdf_unique_resname);
-undump_int(pdf_option_pdf_minor_version);
-undump_int(pdf_option_always_use_pdfpagebox);
-undump_int(pdf_option_pdf_inclusion_errorlevel);
-undump_int(pdf_h_origin);
-undump_int(pdf_v_origin);
-undump_int(pdf_page_width);
-undump_int(pdf_page_height);
- at z
-
- at x (WEB2C!)
-param_base:=xmalloc_array(integer, font_max);
-
-undump_things(font_check[null_font], font_ptr+1-null_font);
- at y
-param_base:=xmalloc_array(integer, font_max);
-
-pdf_char_used:=xmalloc_array(char_used_array, font_max);
-pdf_char_map:=xmalloc_array(char_map_array, font_max);
-pdf_font_size:=xmalloc_array(scaled, font_max);
-pdf_font_num:=xmalloc_array(integer, font_max);
-pdf_font_map:=xmalloc_array(fm_entry_ptr, font_max);
-pdf_font_type:=xmalloc_array(eight_bits, font_max);
-pdf_font_attr:=xmalloc_array(str_number, font_max);
-pdf_font_blink:=xmalloc_array(internal_font_number, font_max);
-pdf_font_elink:=xmalloc_array(internal_font_number, font_max);
-pdf_font_stretch:=xmalloc_array(integer, font_max);
-pdf_font_shrink:=xmalloc_array(integer, font_max);
-pdf_font_step:=xmalloc_array(integer, font_max);
-pdf_font_expand_ratio:=xmalloc_array(integer, font_max);
-pdf_font_auto_expand:=xmalloc_array(boolean, font_max);
-pdf_font_lp_base:=xmalloc_array(integer, font_max);
-pdf_font_rp_base:=xmalloc_array(integer, font_max);
-pdf_font_ef_base:=xmalloc_array(integer, font_max);
-vf_packet_base:=xmalloc_array(integer, font_max);
-vf_default_font:=xmalloc_array(internal_font_number, font_max);
-vf_local_font_num:=xmalloc_array(internal_font_number, font_max);
-vf_e_fnts:=xmalloc_array(integer, font_max);
-vf_i_fnts:=xmalloc_array(internal_font_number, font_max);
-
-for font_k := font_base to font_max do begin
-    for k := 0 to 31 do begin
-        pdf_char_used[font_k, k] := 0;
-        pdf_char_map[font_k, k] := k;
-    end;
-    pdf_char_map[font_k, 32] := 32;
-    pdf_font_size[font_k] := 0;
-    pdf_font_num[font_k] := 0;
-    pdf_font_map[font_k] := 0;
-    pdf_font_type[font_k] := new_font_type;
-    pdf_font_attr[font_k] := "";
-    pdf_font_blink[font_k] := null_font;
-    pdf_font_elink[font_k] := null_font;
-    pdf_font_stretch[font_k] := null_font;
-    pdf_font_shrink[font_k] := null_font;
-    pdf_font_step[font_k] := 0;
-    pdf_font_expand_ratio[font_k] := 0;
-    pdf_font_auto_expand[font_k] := false;
-    pdf_font_lp_base[font_k] := 0;
-    pdf_font_rp_base[font_k] := 0;
-    pdf_font_ef_base[font_k] := 0;
-end;
-
-make_pdftex_banner;
-undump_things(font_check[null_font], font_ptr+1-null_font);
- at z
-
- at x [51.1]
-  setup_bound_var (0)('hash_extra')(hash_extra);
-
- at y
-  setup_bound_var (0)('hash_extra')(hash_extra);
-  setup_bound_var (65536)('obj_tab_size')(obj_tab_size);
-  setup_bound_var (65536)('pdf_mem_size')(pdf_mem_size);
-  setup_bound_var (20000)('dest_names_size')(dest_names_size);
- at z
-
- at x [51.2]
-  const_chk (hash_extra);
-  if error_line > ssup_error_line then error_line := ssup_error_line;
- at y
-  const_chk (hash_extra);
-  const_chk (obj_tab_size);
-  const_chk (pdf_mem_size);
-  const_chk (dest_names_size);
-  if error_line > ssup_error_line then error_line := ssup_error_line;
- at z
-
- at x [51.3]
-  hyph_link :=xmalloc_array (hyph_pointer, hyph_size);
- at y
-  hyph_link :=xmalloc_array (hyph_pointer, hyph_size);
-  obj_tab:=xmalloc_array (obj_entry, obj_tab_size);
-  pdf_mem:=xmalloc_array (integer, pdf_mem_size);
-  dest_names:=xmalloc_array (dest_name_entry, dest_names_size);
- at z
-
- at x (WEB2C!)
-  param_base:=xmalloc_array(integer, font_max);
-
-  font_ptr:=null_font; fmem_ptr:=7;
- at y
-param_base:=xmalloc_array(integer, font_max);
-
-pdf_char_used:=xmalloc_array(char_used_array,font_max);
-pdf_char_map:=xmalloc_array(char_map_array,font_max);
-pdf_font_size:=xmalloc_array(scaled,font_max);
-pdf_font_num:=xmalloc_array(integer,font_max);
-pdf_font_map:=xmalloc_array(fm_entry_ptr,font_max);
-pdf_font_type:=xmalloc_array(eight_bits,font_max);
-pdf_font_attr:=xmalloc_array(str_number,font_max);
-pdf_font_blink:=xmalloc_array(internal_font_number,font_max);
-pdf_font_elink:=xmalloc_array(internal_font_number,font_max);
-pdf_font_stretch:=xmalloc_array(integer,font_max);
-pdf_font_shrink:=xmalloc_array(integer,font_max);
-pdf_font_step:=xmalloc_array(integer,font_max);
-pdf_font_expand_ratio:=xmalloc_array(integer,font_max);
-pdf_font_auto_expand:=xmalloc_array(boolean,font_max);
-pdf_font_lp_base:=xmalloc_array(integer,font_max);
-pdf_font_rp_base:=xmalloc_array(integer,font_max);
-pdf_font_ef_base:=xmalloc_array(integer,font_max);
-vf_packet_base:=xmalloc_array(integer,font_max);
-vf_default_font:=xmalloc_array(internal_font_number,font_max);
-vf_local_font_num:=xmalloc_array(internal_font_number,font_max);
-vf_e_fnts:=xmalloc_array(integer,font_max);
-vf_i_fnts:=xmalloc_array(internal_font_number,font_max);
-
-for font_k := font_base to font_max do begin
-    for k := 0 to 31 do begin
-        pdf_char_used[font_k, k] := 0;
-        pdf_char_map[font_k, k] := k;
-    end;
-    pdf_char_map[font_k, 32] := 32;
-    pdf_font_size[font_k] := 0;
-    pdf_font_num[font_k] := 0;
-    pdf_font_map[font_k] := 0;
-    pdf_font_type[font_k] := new_font_type;
-    pdf_font_attr[font_k] := "";
-    pdf_font_blink[font_k] := null_font;
-    pdf_font_elink[font_k] := null_font;
-    pdf_font_stretch[font_k] := null_font;
-    pdf_font_shrink[font_k] := null_font;
-    pdf_font_step[font_k] := 0;
-    pdf_font_expand_ratio[font_k] := 0;
-    pdf_font_auto_expand[font_k] := false;
-    pdf_font_lp_base[font_k] := 0;
-    pdf_font_rp_base[font_k] := 0;
-    pdf_font_ef_base[font_k] := 0;
-end;
-
-font_ptr:=null_font; fmem_ptr:=7;
-make_pdftex_banner;
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/vadjust.ch
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/vadjust.ch	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/vadjust.ch	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,276 +0,0 @@
-% WEB change file containing vadjust extension for pdfTeX 
-%
-% Copyright (c) 1996-2004 Han Th\^e\llap{\raise 0.5ex\hbox{\'{}}} Th\`anh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: vadjust.ch,v 1.2 2004/08/01 12:12:23 olaf Exp $
-
- at x [142] - pre-vadjust
- at d adjust_node=5 {|type| of an adjust node}
- at y
- at d adjust_node=5 {|type| of an adjust node}
- at d adjust_pre == subtype  {pre-adjustment?}
- at z
-
- at x [162] - pre-vadjust
- at d backup_head==mem_top-13 {head of token list built by |scan_keyword|}
- at d hi_mem_stat_min==mem_top-13 {smallest statically allocated word in
-  the one-word |mem|}
- at d hi_mem_stat_usage=14 {the number of one-word nodes always present}
- at y
- at d backup_head==mem_top-13 {head of token list built by |scan_keyword|}
- at d pre_adjust_head==mem_top-14  {head of pre-adjustment list returned by |hpack|}
- at d hi_mem_stat_min==mem_top-14 {smallest statically allocated word in
-  the one-word |mem|}
- at d hi_mem_stat_usage=15 {the number of one-word nodes always present}
- at z
-
- at x [197] - pre-vadjust
-begin print_esc("vadjust"); node_list_display(adjust_ptr(p)); {recursive call}
- at y
-begin print_esc("vadjust"); if adjust_pre(p) <> 0 then print(" pre ");
-node_list_display(adjust_ptr(p)); {recursive call}
- at z
-
- at x [649] - pre-vadjust
-if adjust_tail<>null then link(adjust_tail):=null;
- at y
-if adjust_tail<>null then link(adjust_tail):=null;
-if pre_adjust_tail<>null then link(pre_adjust_tail):=null;
- at z
-
- at x [655] - pre-vadjust
-@<Transfer node |p| to the adjustment list@>=
-begin while link(q)<>p do q:=link(q);
-if type(p)=adjust_node then
-  begin link(adjust_tail):=adjust_ptr(p);
-  while link(adjust_tail)<>null do adjust_tail:=link(adjust_tail);
-  p:=link(p); free_node(link(q),small_node_size);
-  end
- at y
-@<Glob...@>=
-@!pre_adjust_tail: pointer;
-
-@ @<Set init...@>=
-pre_adjust_tail := null;
-
-@ Materials in \.{\\vadjust} used with \.{pre} keyword will be appended to
-|pre_adjust_tail| instead of |adjust_tail|.
-
- at d update_adjust_list(#) == begin
-    link(#) := adjust_ptr(p);
-    while link(#) <> null do 
-        # := link(#);
-end
-
-@<Transfer node |p| to the adjustment list@>=
-begin while link(q)<>p do q:=link(q);
-    if type(p) = adjust_node then begin
-        if adjust_pre(p) <> 0 then
-            update_adjust_list(pre_adjust_tail)
-        else
-            update_adjust_list(adjust_tail);
-        p := link(p); free_node(link(q), small_node_size);
-    end
- at z
-
- at x [770] - pre-vadjust
- at d align_stack_node_size=5 {number of |mem| words to save alignment states}
- at y
- at d align_stack_node_size=6 {number of |mem| words to save alignment states}
- at z
-
- at x [770] - pre-vadjust
-@!cur_head,@!cur_tail:pointer; {adjustment list pointers}
- at y
-@!cur_head,@!cur_tail:pointer; {adjustment list pointers}
-@!cur_pre_head,@!cur_pre_tail:pointer; {pre-adjustment list pointers}
- at z
-
- at x [771] - pre-vadjust
-cur_head:=null; cur_tail:=null;
- at y
-cur_head:=null; cur_tail:=null;
-cur_pre_head:=null; cur_pre_tail:=null;
- at z
-
- at x [772] - pre-vadjust
-info(p+4):=cur_head; link(p+4):=cur_tail;
- at y
-info(p+4):=cur_head; link(p+4):=cur_tail;
-info(p+5):=cur_pre_head; link(p+5):=cur_pre_tail;
- at z
-
- at x [771] - pre-vadjust
-cur_tail:=link(p+4); cur_head:=info(p+4);
- at y
-cur_tail:=link(p+4); cur_head:=info(p+4);
-cur_pre_tail:=link(p+5); cur_pre_head:=info(p+5);
- at z
-
- at x [786] - pre-vadjust
-cur_align:=link(preamble); cur_tail:=cur_head; init_span(cur_align);
- at y
-cur_align:=link(preamble); cur_tail:=cur_head; cur_pre_tail:=cur_pre_head;
-init_span(cur_align);
- at z
-
- at x [791] - pre-vadjust
-  begin adjust_tail:=cur_tail; u:=hpack(link(head),natural); w:=width(u);
-  cur_tail:=adjust_tail; adjust_tail:=null;
-  end
- at y
-  begin adjust_tail:=cur_tail; pre_adjust_tail:=cur_pre_tail;
-  u:=hpack(link(head),natural); w:=width(u);
-  cur_tail:=adjust_tail; adjust_tail:=null;
-  cur_pre_tail:=pre_adjust_tail; pre_adjust_tail:=null;
-  end
- at z
-
- at x [799] - pre-vadjust
-  pop_nest; append_to_vlist(p);
-  if cur_head<>cur_tail then
-    begin link(tail):=link(cur_head); tail:=cur_tail;
-    end;
- at y
-  pop_nest;
-  if cur_pre_head <> cur_pre_tail then
-      append_list(cur_pre_head)(cur_pre_tail);
-  append_to_vlist(p);
-  if cur_head <> cur_tail then
-      append_list(cur_head)(cur_tail);
- at z
-
- at x [888] - pre-vadjust
-@ @<Append the new box to the current vertical list...@>=
-append_to_vlist(just_box);
-if adjust_head<>adjust_tail then
-  begin link(tail):=link(adjust_head); tail:=adjust_tail;
-   end;
-adjust_tail:=null
- at y
-@ |append_list| is used to append a list to |tail|.
-
- at d append_list_end(#) == tail := #; end
- at d append_list(#) == begin link(tail) := link(#); append_list_end
-
-@<Append the new box to the current vertical list...@>=
-if pre_adjust_head <> pre_adjust_tail then
-    append_list(pre_adjust_head)(pre_adjust_tail);
-pre_adjust_tail := null;
-append_to_vlist(just_box);
-if adjust_head <> adjust_tail then
-    append_list(adjust_head)(adjust_tail);
-adjust_tail := null
- at z
-
- at x
-adjust_tail:=adjust_head;
- at y
-adjust_tail:=adjust_head;
-pre_adjust_tail := pre_adjust_head;
- at z
-
- at x [1076] - pre-vadjust
-    begin append_to_vlist(cur_box);
-    if adjust_tail<>null then
-      begin if adjust_head<>adjust_tail then
-        begin link(tail):=link(adjust_head); tail:=adjust_tail;
-        end;
-      adjust_tail:=null;
-      end;
- at y
-    begin 
-        if pre_adjust_tail <> null then begin
-            if pre_adjust_head <> pre_adjust_tail then
-                append_list(pre_adjust_head)(pre_adjust_tail);
-            pre_adjust_tail := null;
-        end;
-        append_to_vlist(cur_box);
-        if adjust_tail <> null then begin
-            if adjust_head <> adjust_tail then
-                append_list(adjust_head)(adjust_tail);
-            adjust_tail := null;
-        end;
- at z
-
- at x [1085] - pre-vadjust
-adjusted_hbox_group: begin adjust_tail:=adjust_head; package(0);
- at y
-adjusted_hbox_group: begin adjust_tail:=adjust_head; 
-    pre_adjust_tail:=pre_adjust_head; package(0);
- at z
-
- at x [1099] - pre-vadjust
-saved(0):=cur_val; incr(save_ptr);
-new_save_level(insert_group); scan_left_brace; normal_paragraph;
-push_nest; mode:=-vmode; prev_depth:=ignore_depth;
-end;
- at y
-saved(0) := cur_val;
-if (cur_cmd = vadjust) and scan_keyword("pre") then
-    saved(1) := 1
-else
-    saved(1) := 0;
-save_ptr := save_ptr + 2;
-new_save_level(insert_group); scan_left_brace; normal_paragraph;
-push_nest; mode:=-vmode; prev_depth:=ignore_depth;
-end;
- at z
-
- at x [1100] - pre-vadjust
-  d:=split_max_depth; f:=floating_penalty; unsave; decr(save_ptr);
- at y
-  d:=split_max_depth; f:=floating_penalty; unsave; save_ptr := save_ptr - 2;
- at z
-
- at x [1100] - pre-vadjust
-    subtype(tail):=0; {the |subtype| is not used}
- at y
-    adjust_pre(tail) := saved(1); {the |subtype| is used for |adjust_pre|}
- at z
-
- at x [1198] - pre-vadjust
-@!t:pointer; {tail of adjustment list}
- at y
-@!t:pointer; {tail of adjustment list}
-@!pre_t:pointer; {tail of pre-adjustment list}
- at z
-
- at x [1199] - pre-vadjust
-adjust_tail:=adjust_head; b:=hpack(p,natural); p:=list_ptr(b);
-t:=adjust_tail; adjust_tail:=null;@/
- at y
-adjust_tail:=adjust_head; pre_adjust_tail:=pre_adjust_head;
-b:=hpack(p,natural); p:=list_ptr(b);
-t:=adjust_tail; adjust_tail:=null;@/
-pre_t:=pre_adjust_tail; pre_adjust_tail:=null;@/
- at z
-
- at x [1205] - pre-vadjust
-if t<>adjust_head then {migrating material comes after equation number}
-  begin link(tail):=link(adjust_head); tail:=t;
-  end;
- at y
-if t<>adjust_head then {migrating material comes after equation number}
-  begin link(tail):=link(adjust_head); tail:=t;
-  end;
-if pre_t<>pre_adjust_head then
-  begin link(tail):=link(pre_adjust_head); tail:=pre_t;
-  end;
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/win32.mak
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/win32.mak	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdftexdir/win32.mak	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,71 +0,0 @@
-################################################################################
-#
-# Makefile  : Web2C / pdftexdir
-# Author    : Fabrice Popineau <Fabrice.Popineau at supelec.fr>
-# Platform  : Win32, Microsoft VC++ 6.0, depends upon fpTeX 0.5 sources
-# Time-stamp: <04/03/13 13:12:08 popineau>
-#
-################################################################################
-root_srcdir = ..\..\..
-!ifdef DEVELOPMENT
-INCLUDE=$(INCLUDE);$(root_srcdir)\texk.development
-!else
-INCLUDE=$(INCLUDE);$(root_srcdir)\texk
-!endif
-
-
-USE_XPDF = 1
-USE_ZLIB = 1
-USE_PNG = 1
-USE_JPEG = 1
-USE_TEX = 1
-USE_MD5 = 1
-USE_GNUW32 = 1
-USE_KPATHSEA = 1
-
-!include <msvc/common.mak>
-
-DEFS = -I.. -I$(top_srcdir) $(DEFS) -DMAKE_TEX_DLL -DHAVE_CONFIG_H -DpdfeTeX
-
-objects = $(objdir)\avl.obj $(objdir)\avlstuff.obj $(objdir)\epdf.obj 	     \
-	$(objdir)\mapfile.obj                              		     \
-	$(objdir)\utils.obj $(objdir)\vfpacket.obj			     \
-	$(objdir)\pkin.obj $(objdir)\writefont.obj $(objdir)\writet1.obj     \
-	$(objdir)\writet3.obj $(objdir)\writezip.obj $(objdir)\writeenc.obj  \
-	$(objdir)\writettf.obj $(objdir)\writejpg.obj $(objdir)\writepng.obj \
-	$(objdir)\writeimg.obj \
-	$(objdir)\pdftoepdf.obj
-
-default: all
-
-all: $(objdir) libpdftoepdf $(objdir)\libpdf.lib
-
-$(objdir)\libpdf.lib: $(objdir) $(objects) $(md5lib)
-	$(archive) $(objects) $(md5lib)
-
-libpdftoepdf: $(objdir) $(objdir)\libpdftoepdf.lib
-
-$(objdir)\libpdftoepdf.lib: $(objdir)\pdftoepdf.obj $(xpdflib)
-	$(archive) $(objdir)\pdftoepdf.obj $(xpdflib)
-
-$(objdir)\pdftoepdf.obj: pdftoepdf.cc # $(xpdf)
-
-ptexlib.h: ..\pdftexd.h
-
-..\pdftexd.h:
-	- at echo $(verbose) & ( \
-		pushd .. & $(make) pdftexd.h & popd \
-	)
-
-!include <msvc/config.mak>
-!include <msvc/install.mak>
-
-!include <msvc/clean.mak>
-!include <msvc/rdepend.mak>
-
-!include "./depend.mak"
-
-#
-# Local Variables:
-# mode: makefile
-# End:

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/ChangeLog
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/ChangeLog	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/ChangeLog	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,75 +0,0 @@
-2004-09-08  Olaf Weber  <olaf at infovore.xs4all.nl>
-
-	* pdfxtex.mk (pdfxtexdir/pdfxtexextra.h): Spurious $(scrdir) in
-	the sed rules removed.  Reported by Martin Schröder
-	<ms at artcom-gmbh.de>.
-
-2004-08-26  Olaf Weber  <olaf at infovore.xs4all.nl>
-
-	* pdfxtexextra.in: File was renamed; the current pdfTeX and e-TeX
-	versions are substituted from ../pdftexdir/pdftex.version and
-	../etexdir/etex.version.  Variant of code supplied by Peter
-	Breitenlohner <peb at mppmu.mpg.de>.
-
-	* pdfxtex.mk: Added rule to insert pdfTeX and e-TeX versions into
-	pdfxtexextra.h.  Variant of code supplied by Peter Breitenlohner
-	<peb at mppmu.mpg.de>.
-
-2004-08-25  Olaf Weber  <olaf at infovore.xs4all.nl>
-
-	* pdfxtex.ch2: Make pdfxtex.ch2 a patch on pdfetex.ch2 along lines
-	suggested by Peter Breitenlohner.
-
-	* pdfxtex.mk: vadjust.ch moved from pdfxtexdir to pdftexdir.
-	Make pdfxtex.ch2 a patch on pdfetex.ch2 along lines suggested by
-	Peter Breitenlohner.
-	
-2004-08-17  Olaf Weber  <olaf at infovore.xs4all.nl>
-
-	* pdfxtex.mk: Resurrected etex.fix, there is again a need to
-	include late-breaking changes.
-
-2004-07-29  Peter Breitenlohner <peb at mppmu.mpg.de>
-
-	* pdfxtex.ch2, vadjust.ch: Somewhat rearrange handling of kern
-	and math nodes in order to reduce interference between eTeX and
-	pdfTeX change files. Somewhat disentangle preadjustments such
-	that pdfxtex.web can be built with or without hz.ch (not true
-	for pdfxtex.ch).
-
-2004-07-25  Peter Breitenlohner <peb at mppmu.mpg.de>
-
-	* pdfxtex.ch2, strcmp.ch: Reorganize additional command codes for
-	convert and last_item in order to reduce interference between eTeX
-	and pdfTeX change files.
-
-2004-07-23  Peter Breitenlohner <peb at mppmu.mpg.de>
-
-	* pdfxtex.ch2, tex.ch[01]: Reorganize handling of banner string
-	in order to reduce interference between eTeX, pdfTeX, and web2c
-	change files.
-
-2004-07-22  Peter Breitenlohner <peb at mppmu.mpg.de>
-
-	* pdfxtex.ch2: Removed unused token types for pdfTeX's additional
-	token list parameters.
-
-2004-07-19  Peter Breitenlohner <peb at mppmu.mpg.de>
-
-	* pdfxtex.ch2, tex.ch0: Reorganize handling of additional
-	token list and integer parameters and e-TeX's additional
-	penalties in order to reduce interference between eTeX, pdfTeX,
-	and web2c change files.
-
-	* pdfxtex.mk (pdfxtex.ch): Remove tex.ch2 from build rules.
-
-	* tex.ch2: Removed.
-
-2004-07-17  Peter Breitenlohner <peb at mppmu.mpg.de>
-
-	* pdfxtex.mk: Rewrite build rules for pdfxtex.{web,ch},
-	remove etex.{ch0,ch1,fix}, tex.ch2, and several non-dependencies.
-
-	* pdfxtex.ch2: Adapt to eTeX changes.
-
-	* ChangeLog: New file.

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/Makefile.in
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/Makefile.in	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/Makefile.in	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,3 +0,0 @@
-mostlyclean clean:
-distclean maintainer-clean extraclean: clean
-	rm -f Makefile

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/colorspace.ch
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/colorspace.ch	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/colorspace.ch	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,45 +0,0 @@
- at x [416]
- at d pdftex_last_item_codes     = pdftex_first_rint_code + 8 {end of \pdfTeX's command codes}
- at y
- at d pdf_last_ximage_colordepth_code = pdftex_first_rint_code + 9 {code for \.{\\pdflastximagecolordepth}}
- at d pdftex_last_item_codes     = pdftex_first_rint_code + 9 {end of \pdfTeX's command codes}
- at z
-
- at x [416]
-primitive("pdflastypos",last_item,pdf_last_y_pos_code);@/
-@!@:pdf_last_y_pos_}{\.{\\pdflastypos} primitive@>
- at y
-primitive("pdflastypos",last_item,pdf_last_y_pos_code);@/
-@!@:pdf_last_y_pos_}{\.{\\pdflastypos} primitive@>
-primitive("pdflastximagecolordepth",last_item,pdf_last_ximage_colordepth_code);@/
-@!@:pdf_last_ximage_colordepth_}{\.{\\pdflastximagecolordepth} primitive@>
- at z
-
- at x [417]
-  pdf_last_y_pos_code:  print_esc("pdflastypos");
- at y
-  pdf_last_y_pos_code:  print_esc("pdflastypos");
-  pdf_last_ximage_colordepth_code: print_esc("pdflastximagecolordepth");
- at z
-
- at x [424]
-  pdf_last_y_pos_code:  cur_val := pdf_last_y_pos;
- at y
-  pdf_last_y_pos_code:  cur_val := pdf_last_y_pos;
-  pdf_last_ximage_colordepth_code: cur_val := pdf_last_ximage_colordepth;
- at z
-
- at x
-@!pdf_last_ximage_pages: integer;
- at y
-@!pdf_last_ximage_pages: integer;
-@!pdf_last_ximage_colordepth: integer;
- at z
-
- at x
-    pdf_last_ximage_pages := image_pages(obj_ximage_data(k));
- at y
-    pdf_last_ximage_pages := image_pages(obj_ximage_data(k));
-    pdf_last_ximage_colordepth := image_colordepth(obj_ximage_data(k));
- at z
-

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/escapestr.ch
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/escapestr.ch	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/escapestr.ch	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,97 +0,0 @@
- at x [468]
- at d pdf_page_ref_code        = pdftex_first_expand_code + 5 {command code for \.{\\pdfpageref}}
- at d pdftex_convert_codes     = pdftex_first_expand_code + 6 {end of \pdfTeX's command codes}
- at y
- at d pdf_page_ref_code        = pdftex_first_expand_code + 5 {command code for \.{\\pdfpageref}}
- at d pdf_last_escaped_string_code = pdftex_first_expand_code + 6 {command code for \.{\\pdflastescapedstring}}
- at d pdftex_convert_codes     = pdftex_first_expand_code + 7 {end of \pdfTeX's command codes}
- at z
-
- at x [468]
-primitive("pdfpageref",convert,pdf_page_ref_code);@/
-@!@:pdf_page_ref_}{\.{\\pdfpageref} primitive@>
- at y
-primitive("pdfpageref",convert,pdf_page_ref_code);@/
-@!@:pdf_page_ref_}{\.{\\pdfpageref} primitive@>
-primitive("pdflastescapedstring",convert,pdf_last_escaped_string_code);@/
-@!@:pdf_last_escaped_string_}{\.{\\pdflastescapedstring} primitive@>
- at z
-
- at x [469]
-  pdf_page_ref_code:    print_esc("pdfpageref");
- at y
-  pdf_page_ref_code:    print_esc("pdfpageref");
-  pdf_last_escaped_string_code:    print_esc("pdflastescapedstring");
- at z
-
- at x [465]
-@!b:pool_pointer; {base of temporary string}
- at y
-@!b:pool_pointer; {base of temporary string}
-@!i, l: integer; {index to access escaped string}
- at z
-
- at x [471]
-pdf_page_ref_code: begin
-    scan_int;
-    if cur_val <= 0 then
-        pdf_error("pageref", "invalid page number");
-end;
- at y
-pdf_page_ref_code: begin
-    scan_int;
-    if cur_val <= 0 then
-        pdf_error("pageref", "invalid page number");
-end;
-pdf_escape_string_code: do_nothing;
- at z
-
- at x [472]
-pdf_page_ref_code: print_int(get_obj(obj_type_page, cur_val, false));
- at y
-pdf_page_ref_code: print_int(get_obj(obj_type_page, cur_val, false));
-pdf_last_escaped_string_code: begin
-    l := escapedstrlen;
-    for i := 0 to l - 1 do
-        print_char(getescapedchar(i));
-end;
- at z
-
- at x [1344]
- at d pdftex_last_extension_code  == pdftex_first_extension_code + 25
- at y
- at d pdf_escape_string_code      == pdftex_first_extension_code + 26
- at d pdftex_last_extension_code  == pdftex_first_extension_code + 26
- at z
-
- at x [1344]
-primitive("pdfliteral",extension,pdf_literal_node);@/
-@!@:pdf_literal_}{\.{\\pdfliteral} primitive@>
- at y
-primitive("pdfliteral",extension,pdf_literal_node);@/
-@!@:pdf_literal_}{\.{\\pdfliteral} primitive@>
-primitive("pdfescapestring",extension,pdf_escape_string_code);@/
-@!@:pdf_escape_string_}{\.{\\pdfescapestring} primitive@>
- at z
-
-
- at x [1348]
-pdf_literal_node: @<Implement \.{\\pdfliteral}@>;
- at y
-pdf_literal_node: @<Implement \.{\\pdfliteral}@>;
-pdf_escape_string_code: @<Implement \.{\\pdfescapestring}@>;
- at z
-
- at x [1354]
-@ @<Implement \.{\\pdfliteral}@>=
- at y
-@ @<Implement \.{\\pdfescapestring}@>=
-begin
-    scan_pdf_ext_toks;
-    escapestr(tokens_to_string(def_ref));
-    flush_str(last_tokens_string);
-    delete_token_ref(def_ref);
-end
-
-@ @<Implement \.{\\pdfliteral}@>=
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/fixlinedimen.ch
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/fixlinedimen.ch	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/fixlinedimen.ch	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,61 +0,0 @@
-
- at x [247]
- at d pdftex_last_dimen_code  = pdftex_first_dimen_code + 6 {last number defined in this section}
- at y
- at d pdf_first_line_height_code = pdftex_first_dimen_code + 7
- at d pdf_last_line_depth_code   = pdftex_first_dimen_code + 8
- at d pdf_each_line_height_code  = pdftex_first_dimen_code + 9
- at d pdf_each_line_depth_code   = pdftex_first_dimen_code + 10
- at d pdftex_last_dimen_code     = pdftex_first_dimen_code + 10 {last number defined in this section}
- at z
-
- at x [247]
- at d pdf_thread_margin == dimen_par(pdf_thread_margin_code)
- at y
- at d pdf_thread_margin == dimen_par(pdf_thread_margin_code)
- at d pdf_first_line_height == dimen_par(pdf_first_line_height_code)
- at d pdf_last_line_depth   == dimen_par(pdf_last_line_depth_code)
- at d pdf_each_line_height  == dimen_par(pdf_each_line_height_code)
- at d pdf_each_line_depth   == dimen_par(pdf_each_line_depth_code)
- at z
-
- at x [247]
-pdf_thread_margin_code: print_esc("pdfthreadmargin");
- at y
-pdf_thread_margin_code: print_esc("pdfthreadmargin");
-pdf_first_line_height_code: print_esc("pdffirstlineheight");
-pdf_last_line_depth_code: print_esc("pdflastlinedepth");
-pdf_each_line_height_code: print_esc("pdfeachlineheight");
-pdf_each_line_depth_code: print_esc("pdfeachlinedepth");
- at z
-
-
- at x [248]
-primitive("pdfthreadmargin",assign_dimen,dimen_base+pdf_thread_margin_code);@/
-@!@:pdf_thread_margin_}{\.{\\pdfthreadmargin} primitive@>
- at y
-primitive("pdfthreadmargin",assign_dimen,dimen_base+pdf_thread_margin_code);@/
-@!@:pdf_thread_margin_}{\.{\\pdfthreadmargin} primitive@>
-primitive("pdffirstlineheight",assign_dimen,dimen_base+pdf_first_line_height_code);@/
-@!@:pdf_first_line_height_}{\.{\\pdffirstlineheight} primitive@>
-primitive("pdflastlinedepth",assign_dimen,dimen_base+pdf_last_line_depth_code);@/
-@!@:pdf_last_line_depth_}{\.{\\pdflastlinedepth} primitive@>
-primitive("pdfeachlineheight",assign_dimen,dimen_base+pdf_each_line_height_code);@/
-@!@:pdf_each_line_height_}{\.{\\pdfeachlineheight} primitive@>
-primitive("pdfeachlinedepth",assign_dimen,dimen_base+pdf_each_line_depth_code);@/
-@!@:pdf_each_line_depth_}{\.{\\pdfeachlinedepth} primitive@>
- at z
-
- at x [888]
-append_to_vlist(just_box);
- at y
-if pdf_each_line_height <> 0 then
-    height(just_box) := pdf_each_line_height;
-if pdf_each_line_depth <> 0 then
-    depth(just_box) := pdf_each_line_depth;
-if (pdf_first_line_height <> 0) and (cur_line = prev_graf + 1) then
-    height(just_box) := pdf_first_line_height;
-if (pdf_last_line_depth <> 0) and (cur_line + 1 = best_line) then
-    depth(just_box) := pdf_last_line_depth;
-append_to_vlist(just_box);
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/null.ch
===================================================================

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.ch2
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.ch2	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.ch2	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,41 +0,0 @@
-%
-% Copyright (c) 1996-2004 Han The Thanh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: pdfxtex.ch2,v 1.6 2004/08/25 17:15:08 olaf Exp $
-%
-
- at x [1.2] l.188
- at d pdfeTeX_banner=='This is pdfeTeX, Version 3.141592',pdftex_version_string,eTeX_version_string
-   {printed when \pdfeTeX\ starts}
- at y
- at d pdfxTeX_banner=='This is pdfxTeX, Version 3.141592',pdftex_version_string,eTeX_version_string
-   {printed when pdfx\TeX\ starts}
- at z
-
- at x [1.2] l.188
- at d banner==pdfeTeX_banner
- at y
- at d banner==pdfxTeX_banner
- at z
-
- at x
-pdf_print("/Producer (pdfeTeX-");
- at y
-pdf_print("/Producer (pdfxTeX-");
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.defines
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.defines	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.defines	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,96 +0,0 @@
-{
-Copyright (c) 1996-2002 Han The Thanh, <thanh at pdftex.org>
-
-This file is part of pdfTeX.
-
-pdfTeX is free software; you can redistribute it and/or modify
-it under the terms of the GNU General Public License as published by
-the Free Software Foundation; either version 2 of the License, or
-(at your option) any later version.
-
-pdfTeX is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-GNU General Public License for more details.
-
-You should have received a copy of the GNU General Public License
-along with pdfTeX; if not, write to the Free Software
-Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-
-$Id: //depot/Build/source.development/TeX/texk/web2c/pdftexdir/pdftex.defines#11 $
-}
-
-{ pdftex.defines: additions for pdfTeX }
-
-{ macros from pdftex.h }
- at define function pdfcharmarked();
- at define function getlpcode();
- at define function getrpcode();
- at define function getefcode();
- at define function texbopenin();
- at define function vfbopenin ();
- at define procedure pdfmarkchar();
- at define procedure writepdf();
-
-{ functions from mapfile.c }
- at define function hasfmentry();
- at define function tfmoffm();
- at define procedure checkextfm();
- at define procedure pdfmapfile();
- at define procedure pdfmapline();
- at define procedure pdfinitmapfile();
-
-{ functions from utils.c }
- at define function getresnameprefix;
- at define procedure setjobid();
- at define procedure makepdftexbanner;
- at define function extxnoverd();
- at define procedure libpdffinish;
- at define procedure writestreamlength();
- at define procedure printID();
- at define procedure printcreationdate;
- at define procedure escapestr();
- at define function  escapedstrlen;
- at define function  getescapedchar();
-
-{ functions from vfpacket.c }
- at define function newvfpacket();
- at define function packetbyte;
- at define procedure startpacket();
- at define procedure storepacket();
-
-{ functions from writeenc.c }
- at define procedure setcharmap();
-
-{ functions from writefont.c }
- at define procedure dopdffont();
-
-{ functions from writeimg.c }
- at define function checkimageb();
- at define function checkimagec();
- at define function checkimagei();
- at define function epdforigx();
- at define function epdforigy();
- at define function imageheight();
- at define function imagepages();
- at define function imagecolordepth();
- at define function imagewidth();
- at define function imagexres();
- at define function imageyres();
- at define function ispdfimage();
- at define function readimage();
- at define procedure deleteimage();
- at define procedure updateimageprocset();
- at define procedure writeimage();
-
-{ functions from writet3.c }
- at define function getpkcharwidth();
-
-{ functions from writezip.c }
- at define procedure writezip();
-
-{ functions from avlstuff.c }
- at define procedure avlputobj();
- at define function avlfindobj();
-
-{ end of pdftex.defines }

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.h
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.h	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.h	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,50 +0,0 @@
-/*
-Copyright (c) 1996-2004 Han The Thanh, <thanh at pdftex.org>
-
-This file is part of pdfTeX.
-
-pdfTeX is free software; you can redistribute it and/or modify
-it under the terms of the GNU General Public License as published by
-the Free Software Foundation; either version 2 of the License, or
-(at your option) any later version.
-
-pdfTeX is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-GNU General Public License for more details.
-
-You should have received a copy of the GNU General Public License
-along with pdfTeX; if not, write to the Free Software
-Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-
-% $Id: //depot/Build/source.development/TeX/texk/web2c/pdfxtexdir/pdfxtex.h#1 $
-*/
-
-/* Additions to texmfmp.h for pdfTeX */
-
-/* mark a char in font */
-#define pdfmarkchar(f, c) pdfcharused[f][c/8] |= (1<<(c%8))
-
-/* test whether a char in font is marked */
-#define pdfcharmarked(f, c) (boolean)(pdfcharused[f][c/8] & (1<<(c%8)))
-
-/* writepdf() always writes by fwrite() */
-#define       writepdf(a, b) \
-  (void) fwrite ((char *) &pdfbuf[a], sizeof (pdfbuf[a]), \
-                 (int) ((b) - (a) + 1), pdffile)
-
-#define getlpcode(f, c) \
-    (pdffontlpbase[f] == 0 ? 0 : pdfmem[pdffontlpbase[f] + c])
-
-#define getrpcode(f, c) \
-    (pdffontrpbase[f] == 0 ? 0 : pdfmem[pdffontrpbase[f] + c])
-
-#define getefcode(f, c) \
-    (pdffontefbase[f] == 0 ? 1000 : pdfmem[pdffontefbase[f] + c])
-
-#define texbopenin(f) \
-    open_input (&(f), kpse_tex_format, FOPEN_RBIN_MODE)
-#define vfbopenin(f) \
-    open_input (&(f), kpse_vf_format, FOPEN_RBIN_MODE)
-
-#include <pdftexdir/ptexlib.h>

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.mak
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.mak	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.mak	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,159 +0,0 @@
-################################################################################
-#
-# Makefile  : pdfxTeX, web2c win32.mak makefile fragment to build pdfx-TeX
-# Author    : Fabrice Popineau <Fabrice.Popineau at supelec.fr>
-# Platform  : Win32, Microsoft VC++ 6.0, depends upon fpTeX 0.5 sources
-# Time-stamp: <04/03/15 12:23:26 popineau>
-#
-################################################################################
-
-Makefile: $(srcdir)\pdfxtexdir\pdfxtex.mak
-
-# We build pdfxtex
-pdfxtex = $(objdir)\pdfxtex.exe
-!ifdef TEX_DLL
-pdfxtex = $(pdfxtex) $(objdir)\$(library_prefix)pdfxtex.dll
-!endif
-
-# The C sources.
-pdfxtex_c = pdfxtex.c
-pdfxtex_o = $(objdir)\pdfxtex.obj
-
-!ifdef TEX_DLL
-$(objdir)\$(library_prefix)pdfxtex.exp: $(objdir)\$(library_prefix)pdfxtex.lib
-
-$(objdir)\$(library_prefix)pdfxtex.lib: $(pdfxtex_o)
-	$(archive) /DEF $(pdfxtex_o)
-
-$(objdir)\$(library_prefix)pdfxtex.dll: $(pdfxtex_o) $(objdir)\$(library_prefix)pdfxtex.exp $(objdir)\pdfxtex.res $(pdftexlibs) $(kpathsealib) $(proglib)
-	$(link_dll) $(**) $(socketlibs) $(conlibs)
-
-$(objdir)\pdfxtex.exe: $(objdir)\win32main.obj $(objdir)\$(library_prefix)pdfxtex.lib $(proglib)
-	$(link) $(**) $(conlibs)
-!else
-$(objdir)\pdfxtex.exe: $(pdfxtex_o) $(objdir)\win32main.obj $(objdir)\pdfxtex.res $(pdftexlibs) $(kpathsealib) $(proglib)
-	$(link) $(**) $(socketlibs) $(conlibs)
-!endif
-
-# C file dependencies.
-$(pdfxtex_c) pdfxtexcoerce.h pdfxtexd.h: pdfxtex.p $(web2c_texmf)
-	$(web2c) pdfxtex
-
-# Tangling
-pdfxtex.p pdfxtex.pool: $(objdir)\tangle.exe pdfxtex.web pdfxtex.ch
-	.\$(objdir)\tangle pdfxtex.web pdfxtex.ch
-
-pdfxtex_files = \
-	 etexdir\etex.ch0 \
-	 etexdir\etex.ch \
-	 etexdir\etex.fix \
-	 etexdir\etex.ch1 \
-         pdfetexdir\pdfetex.ch1 \
-         pdftexdir\pdftex.ch \
-         pdfetexdir\pdfetex.ch2
-
-pdfxtex_changefiles = \
-	    pdfetexdir\tex.ch0 \
-	    tex.ch \
-	    tex-supp-w32.ch \
-	    etexdir\tex.ch1 \
-	    etexdir\tex.ech \
-	    etexdir\tex.ch2 \
-	    pdfetexdir\tex.ch1 \
-	    pdftexdir\tex.pch \
-	    pdfetexdir\tex.ch2
-
-# Generation of the web and ch files.
-pdfxtex.web: $(objdir)\tie.exe tex.web $(pdfxtex_files) \
-	pdfxtexdir\pdfetex.h pdfetexdir\pdfetex.defines # pdfetexdir\pdfetex.mak
-	.\$(objdir)\tie -m pdfetex.web tex.web $(pdfetex_files)
-
-pdfetex.ch: $(objdir)\tie.exe pdfetex.web $(pdfetex_changefiles) # pdfetexdir/pdfetex.mak
-	.\$(objdir)\tie -c pdfetex.ch pdfetex.web $(pdfetex_changefiles)
-
-pdfxtexdir\pdfxtex.h: pdftexdir\pdftex.h
-	-@$(del) $(@) $(redir_stderr)
-	$(copy) $(**) $(@)
-
-pdfxtexdir\pdfxtex.defines: pdftexdir\pdftex.defines
-	-@$(del) $(@) $(redir_stderr)
-	$(copy) $(**) $(@)
-
-check: pdfxtex-check
-pdfxtex-check: pdfxtex pdfxtex.xfmt
-
-clean:: pdfxtex-clean
-pdfxtex-clean:
-#	$(LIBTOOL) --mode=clean $(RM) pdfxtex
-	- at echo $(verbose) & ( \
-		for %%i in ($(pdfxtex_o) $(pdfxtex_c) pdfxtexextra.c pdfxtexcoerce.h \
-			    pdfxtexd.h pdfxtex.p pdfxtex.pool pdfxtex.web pdfxtex.ch \
-			    pdfxtex.xfmt pdfxtex.log) do $(del) %%i $(redir_stderr) \
-	)
-
-# Dumps
-all_pdfxfmts = pdfxtex.xfmt $(pdfxfmts)
-pdfxfmts: $(all_pdfxfmts)
-
-pdfxtex.xfmt: $(pdfxtex)
-	$(dumpenv) $(make) progname=pdfxtex files="etex.src plain.tex cmr10.tfm" prereq-check
-	$(dumpenv) ./pdfxtex --progname=pdfxtex --jobname=pdfxtex --ini "*\pdfoutput=1\input etex.src \dump" <nul
-
-pdfxlatex.xfmt: $(pdfxtex)
-	$(dumpenv) $(make) progname=pdfxlatex files="latex.ltx" prereq-check
-	$(dumpenv) ./pdfxtex --progname=pdfxlatex --jobname=pdfxlatex --ini "*\pdfoutput=1\input latex.ltx" <nul
-
-pdflatex.xfmt: $(pdfxtex)
-	$(dumpenv) $(make) progname=pdflatex files="latex.ltx" prereq-check
-	$(dumpenv) ./pdfxtex --progname=pdflatex --jobname=pdflatex --ini "*\pdfoutput=1\input latex.ltx" <nul
-
-# 
-# Installation.
-install-pdfxtex: install-pdfxtex-exec install-pdfxtex-data
-install-pdfxtex-exec: install-pdfxtex-links
- at FMU@install-pdfxtex-data: install-pdfxtex-dumps
-install-pdfxtex-dumps: install-pdfxtex-fmts
-
-# The actual binary executables and pool files.
-install-prograns: install-pdfxtex-programs
-install-pdfxtex-programs: $(pdfxtex) $(bindir)
-	- at echo $(verbose) & ( \
-	  for %%p in ($(pdfxtex)) do $(copy) %%p $(bindir) \
-	) $(redir_stdout)
-
-install-links: install-pdfxtex-links
-install-pdfxtex-links: install-pdfxtex-programs
-#	- at echo $(verbose) & ( \
-#	  pushd $(bindir) & \
-#	    $(del) .\pdfxinitex.exe .\pdfxvirtex.exe & \
-#	    $(lnexe) .\pdfxtex.exe $(bindir)\pdfxinitex.exe & \
-#	    $(lnexe) .\pdfxtex.exe $(bindir)\pdfxvirtex.exe & \
-#	  popd \
-#	) $(redir_stdout)
-	- at echo $(verbose) & ( \
-	  if not "$(pdfxfmts)"=="" \
-	    for %%i in ($(pdfxfmts)) do \
-              pushd $(bindir) & \
-                $(del) .\%%~ni.exe & \
-	        $(lnexe) .\pdfxtex.exe $(bindir)\%%~ni.exe & \
-	      popd \
-	) $(redir_stdout)
-
-install-fmts: install-pdfxtex-fmts
-install-pdfxtex-fmts: pdfxfmts $(fmtdir)
-	- at echo $(verbose) & ( \
-	  for %%f in ($(all_pdfxfmts)) \
-	    do $(copy) %%f $(fmtdir)\%%f \
-	) $(redir_stdout)
-
-# Auxiliary files.
-install-data:: install-pdfxtex-data
-install-pdfxtex-data: $(texpooldir)
-	@$(copy) pdfxtex.pool $(texpooldir)\pdfxtex.pool $(redir_stdout)
-
-# end of pdfxtex.mak
-#  
-# Local variables:
-# page-delimiter: "^# \f"
-# mode: Makefile
-# End:

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.mk
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.mk	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtex.mk	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,135 +0,0 @@
-# Makefile fragment for pdfxTeX and web2c. --infovore at xs4all.nl. Public domain.
-# This fragment contains the parts of the makefile that are most likely to
-# differ between releases of pdfxTeX.
-
-Makefile: $(srcdir)/pdfxtexdir/pdfxtex.mk
-
-# We build pdfxtex
-pdfxtex = @PXTEX@ pdfxtex
-pdfxtexdir = pdfxtexdir
-
-# The C sources.
-pdfxtex_c = pdfxtexini.c pdfxtex0.c pdfxtex1.c pdfxtex2.c pdfxtex3.c
-pdfxtex_o = pdfxtexini.o pdfxtex0.o pdfxtex1.o pdfxtex2.o pdfxtex3.o pdfxtexextra.o
-
-# Making pdfxtex
-pdfxtex: pdftexd.h $(pdfxtex_o) $(pdfxtexextra_o) $(pdftexlibsdep)
-	@CXXHACKLINK@ $(pdfxtex_o) $(pdfxtexextra_o) $(pdftexlibs) $(socketlibs) @CXXHACKLDLIBS@ @CXXLDEXTRA@
-
-# C file dependencies.
-$(pdfxtex_c) pdfxtexcoerce.h pdfxtexd.h: pdfxtex.p $(web2c_texmf) pdfxtexdir/pdfxtex.defines
-	$(web2c) pdfxtex
-pdfxtexextra.c: pdfxtexdir/pdfxtexextra.h lib/texmfmp.c
-	sed s/TEX-OR-MF-OR-MP/pdfxtex/ $(srcdir)/lib/texmfmp.c >$@
-pdfxtexdir/pdfxtexextra.h: pdfxtexdir/pdfxtexextra.in pdftexdir/pdftex.version etexdir/etex.version
-	sed -e s/PDFTEX-VERSION/`cat pdftexdir/pdftex.version`/ \
-	    -e s/ETEX-VERSION/`cat etexdir/etex.version`/ \
-	  $(srcdir)/pdfxtexdir/pdfxtexextra.in >$@
-
-# Tangling
-pdfxtex.p pdfxtex.pool: tangle pdfxtex.web pdfxtex.ch
-	$(TANGLE) pdfxtex.web pdfxtex.ch
-
-# Generation of the web and ch file.
-#   Sources for pdfxtex.web:
-pdfxtex_web_srcs = $(srcdir)/tex.web \
-  $(srcdir)/etexdir/etex.ch \
-  $(srcdir)/etexdir/etex.fix \
-  $(srcdir)/pdfetexdir/pdfetex.ch1 \
-  $(srcdir)/pdftexdir/pdftex.ch \
-  $(srcdir)/pdftexdir/hz.ch \
-  $(srcdir)/pdftexdir/misc.ch \
-  $(srcdir)/pdftexdir/vadjust.ch \
-  $(srcdir)/pdfxtexdir/strcmp.ch \
-  $(srcdir)/pdfxtexdir/quitvmode.ch \
-  $(srcdir)/pdfxtexdir/tagcode.ch \
-  $(srcdir)/pdfxtexdir/pxdimen.ch \
-  $(srcdir)/pdfxtexdir/escapestr.ch \
-  $(srcdir)/pdfxtexdir/fixlinedimen.ch \
-  $(srcdir)/pdfxtexdir/colorspace.ch \
-  $(srcdir)/pdfetexdir/pdfetex.ch2 \
-  $(srcdir)/pdfxtexdir/pdfxtex.ch2
-#   Sources for pdfxtex.ch:
-pdfxtex_ch_srcs = pdfxtex.web \
-  $(srcdir)/pdfxtexdir/tex.ch0 \
-  $(srcdir)/tex.ch \
-  $(srcdir)/etexdir/tex.ch1 \
-  $(srcdir)/etexdir/tex.ech \
-  $(srcdir)/pdfxtexdir/tex.ch1 \
-  $(srcdir)/pdftexdir/tex.pch
-#   Rules:
-pdfxtex.web: tie pdfxtexdir/pdfxtex.mk $(pdfxtex_web_srcs)
-	$(TIE) -m pdfxtex.web $(pdfxtex_web_srcs)
-pdfxtex.ch: $(pdfxtex_ch_srcs)
-	$(TIE) -c pdfxtex.ch $(pdfxtex_ch_srcs)
-
-$(srcdir)/pdfxtexdir/pdfxtex.h: $(srcdir)/pdftexdir/pdftex.h
-	cp -f $(srcdir)/pdftexdir/pdftex.h $@
-
-$(srcdir)/pdfxtexdir/pdfxtex.defines: $(srcdir)/pdftexdir/pdftex.defines
-	cp -f $(srcdir)/pdftexdir/pdftex.defines $@
-
-check: @PXTEX@ pdfxtex-check
-pdfxtex-check: pdfxtex pdfxtex.fmt
-
-clean:: pdfxtex-clean
-pdfxtex-clean:
-	$(LIBTOOL) --mode=clean $(RM) pdfxtex
-	rm -f $(pdfxtex_o) $(pdfxtex_c) pdfxtexextra.c pdfxtexcoerce.h
-	rm -f pdfxtexdir/pdfxtexextra.h
-	rm -f pdfxtexd.h pdfxtex.p pdfxtex.pool pdfxtex.web pdfxtex.ch
-	rm -f pdfxtex.fmt pdfxtex.log
-
-# Dumps
-all_pdfxfmts = pdfxtex.fmt $(pdfxfmts)
-
-dumps: @PXTEX@ pdfxfmts
-pdfxfmts: $(all_pdfxfmts)
-
-pdfxfmtdir = $(web2cdir)/pdfxtex
-$(pdfxfmtdir)::
-	$(SHELL) $(top_srcdir)/../mkinstalldirs $(pdfxfmtdir)
-
-pdfxtex.fmt: pdfxtex
-	$(dumpenv) $(MAKE) progname=pdfxtex files="etex.src plain.tex cmr10.tfm" prereq-check
-	$(dumpenv) ./pdfxtex --progname=pdfxtex --jobname=pdfxtex --ini \*\\pdfoutput=1\\input etex.src \\dump </dev/null
-
-pdfxlatex.fmt: pdfxtex
-	$(dumpenv) $(MAKE) progname=pdfxlatex files="latex.ltx" prereq-check
-	$(dumpenv) ./pdfxtex --progname=pdfxlatex --jobname=pdfxlatex --ini \*\\pdfoutput=1\\input latex.ltx </dev/null
-
-#pdflatex.fmt: pdfxtex
-#	$(dumpenv) $(MAKE) progname=pdflatex files="latex.ltx" prereq-check
-#	$(dumpenv) ./pdfxtex --progname=pdflatex --jobname=pdflatex --ini \*\\pdfoutput=1\\input latex.ltx </dev/null
-
-# 
-# Installation.
-install-pdfxtex: install-pdfxtex-exec install-pdfxtex-data
-install-pdfxtex-exec: install-pdfxtex-links
-install-pdfxtex-data: install-pdfxtex-pool @FMU@ install-pdfxtex-dumps
-install-pdfxtex-dumps: install-pdfxtex-fmts
-
-# The actual binary executables and pool files.
-install-programs: @PXTEX@ install-pdfxtex-programs
-install-pdfxtex-programs: $(pdfxtex) $(bindir)
-	for p in pdfxtex; do $(INSTALL_LIBTOOL_PROG) $$p $(bindir); done
-
-install-links: @PXTEX@ install-pdfxtex-links
-install-pdfxtex-links: install-pdfxtex-programs
-	#cd $(bindir) && (rm -f pdfxinitex pdfxvirtex; \
-	#  $(LN) pdfxtex pdfxinitex; $(LN) pdfxtex pdfvirxtex)
-
-install-fmts: @PXTEX@ install-pdfxtex-fmts
-install-pdfxtex-fmts: pdfxfmts $(pdfxfmtdir)
-	pdfxfmts="$(all_pdfxfmts)"; \
-	  for f in $$pdfxfmts; do $(INSTALL_DATA) $$f $(pdfxfmtdir)/$$f; done
-	pdfxfmts="$(pdfxfmts)"; \
-	  for f in $$pdfxfmts; do base=`basename $$f .fmt`; \
-	    (cd $(bindir) && (rm -f $$base; $(LN) pdfxtex $$base)); done
-
-# Auxiliary files.
-install-data:: @PXTEX@ install-pdfxtex-data
-install-pdfxtex-pool: pdfxtex.pool $(texpooldir)
-	$(INSTALL_DATA) pdfxtex.pool $(texpooldir)/pdfxtex.pool
-
-# end of pdfxtex.mk

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtexextra.in
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtexextra.in	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pdfxtexextra.in	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,41 +0,0 @@
-/*
-Copyright (c) 1996-2004 Han The Thanh, <thanh at pdftex.org>
-
-This file is part of pdfTeX.
-
-pdfTeX is free software; you can redistribute it and/or modify
-it under the terms of the GNU General Public License as published by
-the Free Software Foundation; either version 2 of the License, or
-(at your option) any later version.
-
-pdfTeX is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-GNU General Public License for more details.
-
-You should have received a copy of the GNU General Public License
-along with pdfTeX; if not, write to the Free Software
-Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-
-% $Id: pdfxtexextra.in,v 1.4 2004/08/26 18:23:42 olaf Exp $
-*/
-
-/* pdfxtexextra.in: banner etc. for pdfxTeX.
-
-   This is included by pdfxTeX, from ../pdfxtexextra.c
-   (generated from ../lib/texmfmp.c).
-*/
-
-#define BANNER "This is pdfxTeX, Version 3.141592-PDFTEX-VERSION-ETEX-VERSION"
-#define COPYRIGHT_HOLDER "Peter Breitenlohner (eTeX)/Han The Thanh (pdfTeX)"
-#define AUTHOR NULL
-#define PROGRAM_HELP PDFXTEXHELP
-#define BUG_ADDRESS "pdftex at tug.org"
-#define DUMP_VAR TEXformatdefault
-#define DUMP_LENGTH_VAR formatdefaultlength
-#define DUMP_OPTION "fmt"
-#define DUMP_EXT ".fmt"
-#define INPUT_FORMAT kpse_tex_format
-#define INI_PROGRAM "pdfxinitex"
-#define VIR_PROGRAM "pdfxvirtex"
-

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pxdimen.ch
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pxdimen.ch	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/pxdimen.ch	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,72 +0,0 @@
-% WEB change file containing the \pdfpxdimen extension for pdfTeX
-%
-% Copyright (c) 2004 Taco Hoekwater, <taco at aanhet.net>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id $
-
- at x [236]
- at d pdf_protrude_chars_code   = pdftex_first_integer_code + 11 {protrude chars at left/right edge of paragraphs}
- at d pdf_int_pars=pdftex_first_integer_code + 12 {total number of \pdfTeX's integer parameters}
- at y
- at d pdf_protrude_chars_code   = pdftex_first_integer_code + 11 {protrude chars at left/right edge of paragraphs}
- at d pdf_px_dimen_code = pdftex_first_integer_code + 12 {the code for the pixel dimen value}
- at d pdf_int_pars=pdftex_first_integer_code + 13 {total number of \pdfTeX's integer parameters}
- at z
-
- at x [236]
- at d pdf_option_pdf_inclusion_errorlevel == int_par(pdf_option_pdf_inclusion_errorlevel_code)
- at y
- at d pdf_option_pdf_inclusion_errorlevel == int_par(pdf_option_pdf_inclusion_errorlevel_code)
- at d pdf_px_dimen == int_par(pdf_px_dimen_code)
- at z
-
- at x [237]
-pdf_option_pdf_inclusion_errorlevel_code: print_esc("pdfoptionpdfinclusionerrorlevel");
- at y
-pdf_option_pdf_inclusion_errorlevel_code: print_esc("pdfoptionpdfinclusionerrorlevel");
-pdf_px_dimen_code: print_esc("pdfpxdimen");
- at z
-
- at x [238]
-primitive("pdfoptionpdfinclusionerrorlevel",assign_int,int_base+pdf_option_pdf_inclusion_errorlevel_code);@/
-@!@:pdf_option_pdf_inclusion_errorlevel_}{\.{\\pdfoptionpdfinclusionerrorlevel} primitive@>
- at y
-primitive("pdfoptionpdfinclusionerrorlevel",assign_int,int_base+pdf_option_pdf_inclusion_errorlevel_code);@/
-@!@:pdf_option_pdf_inclusion_errorlevel_}{\.{\\pdfoptionpdfinclusionerrorlevel} primitive@>
-primitive("pdfpxdimen",assign_int,int_base+pdf_px_dimen_code);@/
-@!@:pdf_px_dimen_}{\.{\\pdfpxdimen} primitive@>
- at z
-
- at x [240]
-for k:=int_base to del_code_base-1 do eqtb[k].int:=0;
- at y
-for k:=int_base to del_code_base-1 do eqtb[k].int:=0;
-pdf_px_dimen := unity;
- at z
-
- at x [455]
-else if scan_keyword("ex") then v:=(@<The x-height for |cur_font|@>)
- at .ex@>
- at y
-else if scan_keyword("ex") then v:=(@<The x-height for |cur_font|@>)
- at .ex@>
-else if scan_keyword("px") then v:=pdf_px_dimen
- at .px@>
- at z
-

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/quitvmode.ch
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/quitvmode.ch	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/quitvmode.ch	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,41 +0,0 @@
-@ Here is a really small patch to add a new primitive called
-\.{\\quitvmode}. In vertical modes, it is identical to \.{\\indent},
-but in horizontal and math modes it is really a no-op (as opposed to
-\.{\\indent}, which executes the |indent_in_hmode| procedure). 
-
-
- at x [1088]
-@ A paragraph begins when horizontal-mode material occurs in vertical mode,
-or when the paragraph is explicitly started by `\.{\\indent}' or
-`\.{\\noindent}'.
-
-@<Put each...@>=
-primitive("indent",start_par,1);
-@!@:indent_}{\.{\\indent} primitive@>
-primitive("noindent",start_par,0);
-@!@:no_indent_}{\.{\\noindent} primitive@>
- at y
-@ A paragraph begins when horizontal-mode material occurs in vertical mode,
-or when the paragraph is explicitly started by `\.{\\quitvmode}', 
-`\.{\\indent}' or `\.{\\noindent}'.
-
-@<Put each...@>=
-primitive("indent",start_par,1);
-@!@:indent_}{\.{\\indent} primitive@>
-primitive("noindent",start_par,0);
-@!@:no_indent_}{\.{\\noindent} primitive@>
-primitive("quitvmode",start_par,2);
-@!@:quit_vmode_}{\.{\\quitvmode} primitive@>
- at z
-
- at x [1089]
-start_par: if chr_code=0 then print_esc("noindent")@+ else print_esc("indent");
- at y
-start_par: if chr_code=0 then print_esc("noindent")@+ else if chr_code=1 then print_esc("indent")@+ else print_esc("quitvmode");
- at z
-
- at x [1092]
-hmode+start_par,mmode+start_par: indent_in_hmode;
- at y
-hmode+start_par,mmode+start_par: if cur_chr<>2 then indent_in_hmode;
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/strcmp.ch
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/strcmp.ch	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/strcmp.ch	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,129 +0,0 @@
-% WEB change file containing the \pdfstrcmp extension for pdfTeX 
-%
-% Copyright (c) 2004 Han Th\^e\llap{\raise 0.5ex\hbox{\'{}}} Th\`anh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: strcmp.ch,v 1.2 2004/07/30 07:12:48 olaf Exp $
-
- at x [416]
- at d pdftex_last_item_codes     = pdftex_first_rint_code + 7 {end of \pdfTeX's command codes}
- at y
- at d pdf_strcmp_result_code     = pdftex_first_rint_code + 8 {result of \.{\\pdfstrcmp}}
- at d pdftex_last_item_codes     = pdftex_first_rint_code + 8 {end of \pdfTeX's command codes}
- at z
-
- at x [416]
-primitive("pdflastypos",last_item,pdf_last_y_pos_code);@/
-@!@:pdf_last_y_pos_}{\.{\\pdflastypos} primitive@>
- at y
-primitive("pdflastypos",last_item,pdf_last_y_pos_code);@/
-@!@:pdf_last_y_pos_}{\.{\\pdflastypos} primitive@>
-primitive("pdfstrcmpresult",last_item,pdf_strcmp_result_code);@/
-@!@:pdf_strcmp_result_}{\.{\\pdfstrcmpresult} primitive@>
- at z
-
- at x [417]
-  pdf_last_y_pos_code:  print_esc("pdflastypos");
- at y
-  pdf_last_y_pos_code:  print_esc("pdflastypos");
-  pdf_strcmp_result_code: print_esc("pdfstrcmpresult");
- at z
-
- at x [424]
-  pdf_last_y_pos_code:  cur_val := pdf_last_y_pos;
- at y
-  pdf_last_y_pos_code:  cur_val := pdf_last_y_pos;
-  pdf_strcmp_result_code:  cur_val := pdf_strcmp_result;
- at z
-
- at x [1344]
- at d pdftex_last_extension_code  == pdftex_first_extension_code + 24
- at y
- at d pdf_strcmp_code             == pdftex_first_extension_code + 25
- at d pdftex_last_extension_code  == pdftex_first_extension_code + 25
- at z
-
- at x [1344]
-primitive("pdfliteral",extension,pdf_literal_node);@/
-@!@:pdf_literal_}{\.{\\pdfliteral} primitive@>
- at y
-primitive("pdfliteral",extension,pdf_literal_node);@/
-@!@:pdf_literal_}{\.{\\pdfliteral} primitive@>
-primitive("pdfstrcmp",extension,pdf_strcmp_code);@/
-@!@:pdf_strcmp_}{\.{\\pdfstrcmp} primitive@>
- at z
-
- at x [1348]
-pdf_literal_node: @<Implement \.{\\pdfliteral}@>;
- at y
-pdf_literal_node: @<Implement \.{\\pdfliteral}@>;
-pdf_strcmp_code: @<Implement \.{\\pdfstrcmp}@>;
- at z
-
- at x [1354]
-@ @<Implement \.{\\pdfliteral}@>=
- at y
-@ @<Declare procedures needed in |do_ext...@>=
-procedure compare_strings;
-label done;
-var s1, s2: str_number;
-    i1, i2, j1, j2: pool_pointer;
-    result: integer;
-begin
-    call_func(scan_toks(false, true));
-    s1 := tokens_to_string(def_ref);
-    delete_token_ref(def_ref);
-    call_func(scan_toks(false, true));
-    s2 := tokens_to_string(def_ref);
-    delete_token_ref(def_ref);
-    i1 := str_start[s1];
-    j1 := str_start[s1 + 1];
-    i2 := str_start[s2];
-    j2 := str_start[s2 + 1];
-    while (i1 < j1) and (i2 < j2) do begin
-        if str_pool[i1] < str_pool[i2] then begin
-            result := -1;
-            goto done;
-        end;
-        if str_pool[i1] > str_pool[i2] then begin
-            result := 1;
-            goto done;
-        end;
-        incr(i1);
-        incr(i2);
-    end;
-    if (i1 = j1) and (i2 = j2) then
-        result := 0
-    else if i1 < j1 then
-        result := 1
-    else
-        result := -1;
-done:
-    pdf_strcmp_result := result;
-    flush_str(s2);
-    flush_str(s1);
-end;
-
-@ @<Implement \.{\\pdfstrcmp}@>=
-compare_strings
-
-@ @<Glob...@>=
-@!pdf_strcmp_result: integer;
-
-@ @<Implement \.{\\pdfliteral}@>=
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tagcode.ch
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tagcode.ch	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tagcode.ch	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,119 +0,0 @@
-@ This change file creates an extra primitive named \.{\\tagcode}, allowing
-read and write access to a character's |char_tag| info. The associated internal
-command is |assign_font_int|, with the new modifier value |tag_code|.
-
-The only write operation that is (currently) performed is clearing the value of
-the |char_tag|, so it is more like `read/delete' access. The operation is done 
-by substracting a value based on the user's input, using the following rules:
-
-\item If the character doesn't exist, return immediately.
-\item If the user's input is less than -7, it is first changed to -7. 
-\item If the supplied input is positive, it is converted to 0. 
-\item If the input is -4 or less, |ext_tag| will be cleared,
-	and the input is increased by 4.
-\item If the input is now -3 or -2, |list_tag| will be 
-	cleared, and the input is increased by 2.
-\item If the input is still negative (-1), |lig_tag| will be cleared.
-
-Nothing other than the |char_tag| value is changed, and nothing is saved. 
-The primitive works directly on |font_info|, so all changes are \.{\\global},
-the same as for the other font assignment primitives.
-
-If the character doesn't exist, the read operation returns
--1. Otherwise, the return value is the 4 if |ext_tag| was set, 2 if
-|list_tag| was set, 1 if |lig_tag| was set, or 0 if the tag value was
-|no_tag|.  The return values are chosen in such a way as to be
-consistent with the absolute value of the assignment argument.
-
-Released to the public domain by the author, Taco Hoekwater
-
- at x [230]
- at d ef_code_base == 4
- at y
- at d ef_code_base == 4
- at d tag_code == 5
- at z
-
- at x [230]
-    ef_code_base: scanned_result(get_ef_code(n, k))(int_val);
- at y
-    ef_code_base: scanned_result(get_ef_code(n, k))(int_val);
-    tag_code: scanned_result(get_tag_code(n, k))(int_val);
- at z
-
- at x [577]
-@<Declare procedures that scan font-related stuff@>=
-procedure scan_font_ident;
- at y
-@<Declare procedures that scan font-related stuff@>=
-function get_tag_code(f: internal_font_number; c: eight_bits): integer;
-var i:small_number;
-begin
-	if (c>=font_bc[f]) and (c<=font_ec[f]) and (char_exists(char_info(f)(c))) then
-      begin i := char_tag(char_info(f)(c));
-      if i = lig_tag then
-        get_tag_code := 1
-	  else if i = list_tag then
-        get_tag_code := 2
-	  else if i = ext_tag then
-        get_tag_code := 4
-	  else
-	    get_tag_code := 0;
-      end
-   else
-       get_tag_code := -1;
-end;
-procedure scan_font_ident;
- at z
-
- at x [???]
-function init_font_base(v: integer): integer;
- at y
-procedure set_tag_code(f: internal_font_number; c: eight_bits; i: integer);
-var fixedi:integer;
-begin
-  if (c>=font_bc[f]) and (c<=font_ec[f]) and (char_exists(char_info(f)(c))) then
-    begin fixedi := abs(fix_int(i,-7,0));
-      if fixedi >= 4 then begin
-          if char_tag(char_info(f)(c)) = ext_tag then
-          op_byte(char_info(f)(c)) := (op_byte(char_info(f)(c))) - ext_tag;
-        fixedi := fixedi - 4;
-      end;
-      if fixedi >= 2 then begin
-        if char_tag(char_info(f)(c)) = list_tag then
-          op_byte(char_info(f)(c)) := (op_byte(char_info(f)(c))) - list_tag;
-        fixedi := fixedi - 2;
-      end;
-      if fixedi >= 1 then begin
-        if char_tag(char_info(f)(c)) = lig_tag then
-          op_byte(char_info(f)(c)) := (op_byte(char_info(f)(c))) - lig_tag;
-    end;
-  end;
-end;
-
-function init_font_base(v: integer): integer;
- at z
-
- at x [1253]
-    ef_code_base: set_ef_code(f, p, cur_val);
- at y
-    ef_code_base: set_ef_code(f, p, cur_val);
-    tag_code: set_tag_code(f, p, cur_val);
- at z
-
- at x [1254]
-primitive("efcode",assign_font_int,ef_code_base);
-@!@:ef_code_}{\.{\\efcode} primitive@>
- at y
-primitive("efcode",assign_font_int,ef_code_base);
-@!@:ef_code_}{\.{\\efcode} primitive@>
-primitive("tagcode",assign_font_int,tag_code);
-@!@:tag_code_}{\.{\\tagcode} primitive@>
- at z
-
- at x [1255]
-ef_code_base: print_esc("efcode");
- at y
-ef_code_base: print_esc("efcode");
-tag_code: print_esc("tagcode");
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tex.ch0
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tex.ch0	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tex.ch0	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,42 +0,0 @@
-%
-% Copyright (c) 2004 Han The Thanh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: tex.ch0,v 1.2 2004/07/30 07:04:10 olaf Exp $
-%
-% Change file to assist in creating the web2c-specific change file.
-% This one comes first, resolves inconsistencies between the generated
-% pdfetex.web and tex.ch
-
- at x [1.2] l.188
- at d TeX_banner=='This is TeX, Version 3.141592' {printed when \TeX\ starts}
-@#
- at d banner==pdfxTeX_banner
- at y
- at d banner=='This is TeX, Version 3.141592' {printed when \TeX\ starts}
- at z
-
- at x [17.236] l.4960 - first web2c, then pdfTeX, then e-TeX additional integer parameters
- at d tex_int_pars=55 {total number of \TeX's integer parameters}
-@#
- at d pdftex_first_integer_code = tex_int_pars {base for \pdfTeX's integer parameters}
- at y
- at d int_pars=55 {total number of integer parameters}
-@#
- at d etex_int_base=tex_int_pars {base for \eTeX's integer parameters}
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tex.ch1
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tex.ch1	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tex.ch1	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,45 +0,0 @@
-%
-% Copyright (c) 2004 Han The Thanh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: tex.ch1,v 1.2 2004/07/30 07:04:19 olaf Exp $
-%
-% Change file to assist in creating the web2c-specific change file.
-% This one resolves inconsistencies between the etex changes for
-% web2c and pdftex changes for web2c.
-
- at x [1] m.2 l.188 - Web2C: extensions imply we're not pdfxTeX
- at d pdfxTeX_banner=='This is pdfxTeX, Version 3.141592',pdftex_version_string,eTeX_version_string
- at y
- at d pdfxTeX_banner_k=='This is pdfxTeXk, Version 3.141592',pdftex_version_string,eTeX_version_string
- at d pdfxTeX_banner=='This is pdfxTeX, Version 3.141592',pdftex_version_string,eTeX_version_string
- at z
-
- at x [1] m.2 l.188 - banner
- at d banner==eTeX_banner
- at d banner_k==eTeX_banner_k
- at y
- at d banner==pdfxTeX_banner
- at d banner_k==pdfxTeX_banner_k
- at z
-
- at x [17.236] l.4960 - first web2c, then pdfTeX, then e-TeX additional integer parameters
- at d etex_int_base=web2c_int_pars {base for \eTeX's integer parameters}
- at y
- at d pdftex_first_integer_code = web2c_int_pars {base for \pdfTeX's integer parameters}
- at z

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tex.ch2
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tex.ch2	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/tex.ch2	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,21 +0,0 @@
-%
-% Copyright (c) 2004 Han The Thanh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: tex.ch2,v 1.1 2004/02/26 13:40:37 thanh Exp $
-%

Deleted: tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/vadjust.ch
===================================================================
--- tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/vadjust.ch	2006-07-26 16:10:34 UTC (rev 1531)
+++ tetex-bin/branches/pdftex-1.4/texk/web2c/pdfxtexdir/vadjust.ch	2006-07-26 16:30:55 UTC (rev 1532)
@@ -1,276 +0,0 @@
-% WEB change file containing vadjust extension for pdfTeX 
-%
-% Copyright (c) 1996-2004 Han Th\^e\llap{\raise 0.5ex\hbox{\'{}}} Th\`anh, <thanh at pdftex.org>
-%
-% This file is part of pdfTeX.
-%
-% pdfTeX is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% pdfTeX is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with pdfTeX; if not, write to the Free Software
-% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-%
-% $Id: vadjust.ch,v 1.2 2004/08/01 12:12:23 olaf Exp $
-
- at x [142] - pre-vadjust
- at d adjust_node=5 {|type| of an adjust node}
- at y
- at d adjust_node=5 {|type| of an adjust node}
- at d adjust_pre == subtype  {pre-adjustment?}
- at z
-
- at x [162] - pre-vadjust
- at d backup_head==mem_top-13 {head of token list built by |scan_keyword|}
- at d hi_mem_stat_min==mem_top-13 {smallest statically allocated word in
-  the one-word |mem|}
- at d hi_mem_stat_usage=14 {the number of one-word nodes always present}
- at y
- at d backup_head==mem_top-13 {head of token list built by |scan_keyword|}
- at d pre_adjust_head==mem_top-14  {head of pre-adjustment list returned by |hpack|}
- at d hi_mem_stat_min==mem_top-14 {smallest statically allocated word in
-  the one-word |mem|}
- at d hi_mem_stat_usage=15 {the number of one-word nodes always present}
- at z
-
- at x [197] - pre-vadjust
-begin print_esc("vadjust"); node_list_display(adjust_ptr(p)); {recursive call}
- at y
-begin print_esc("vadjust"); if adjust_pre(p) <> 0 then print(" pre ");
-node_list_display(adjust_ptr(p)); {recursive call}
- at z
-
- at x [649] - pre-vadjust
-if adjust_tail<>null then link(adjust_tail):=null;
- at y
-if adjust_tail<>null then link(adjust_tail):=null;
-if pre_adjust_tail<>null then link(pre_adjust_tail):=null;
- at z
-
- at x [655] - pre-vadjust
-@<Transfer node |p| to the adjustment list@>=
-begin while link(q)<>p do q:=link(q);
-if type(p)=adjust_node then
-  begin link(adjust_tail):=adjust_ptr(p);
-  while link(adjust_tail)<>null do adjust_tail:=link(adjust_tail);
-  p:=link(p); free_node(link(q),small_node_size);
-  end
- at y
-@<Glob...@>=
-@!pre_adjust_tail: pointer;
-
-@ @<Set init...@>=
-pre_adjust_tail := null;
-
-@ Materials in \.{\\vadjust} used with \.{pre} keyword will be appended to
-|pre_adjust_tail| instead of |adjust_tail|.
-
- at d update_adjust_list(#) == begin
-    link(#) := adjust_ptr(p);
-    while link(#) <> null do 
-        # := link(#);
-end
-
-@<Transfer node |p| to the adjustment list@>=
-begin while link(q)<>p do q:=link(q);
-    if type(p) = adjust_node then begin
-        if adjust_pre(p) <> 0 then
-            update_adjust_list(pre_adjust_tail)
-        else
-            update_adjust_list(adjust_tail);
-        p := link(p); free_node(link(q), small_node_size);
-    end
- at z
-
- at x [770] - pre-vadjust
- at d align_stack_node_size=5 {number of |mem| words to save alignment states}
- at y
- at d align_stack_node_size=6 {number of |mem| words to save alignment states}
- at z
-
- at x [770] - pre-vadjust
-@!cur_head,@!cur_tail:pointer; {adjustment list pointers}
- at y
-@!cur_head,@!cur_tail:pointer; {adjustment list pointers}
-@!cur_pre_head,@!cur_pre_tail:pointer; {pre-adjustment list pointers}
- at z
-
- at x [771] - pre-vadjust
-cur_head:=null; cur_tail:=null;
- at y
-cur_head:=null; cur_tail:=null;
-cur_pre_head:=null; cur_pre_tail:=null;
- at z
-
- at x [772] - pre-vadjust
-info(p+4):=cur_head; link(p+4):=cur_tail;
- at y
-info(p+4):=cur_head; link(p+4):=cur_tail;
-info(p+5):=cur_pre_head; link(p+5):=cur_pre_tail;
- at z
-
- at x [771] - pre-vadjust
-cur_tail:=link(p+4); cur_head:=info(p+4);
- at y
-cur_tail:=link(p+4); cur_head:=info(p+4);
-cur_pre_tail:=link(p+5); cur_pre_head:=info(p+5);
- at z
-
- at x [786] - pre-vadjust
-cur_align:=link(preamble); cur_tail:=cur_head; init_span(cur_align);
- at y
-cur_align:=link(preamble); cur_tail:=cur_head; cur_pre_tail:=cur_pre_head;
-init_span(cur_align);
- at z
-
- at x [791] - pre-vadjust
-  begin adjust_tail:=cur_tail; u:=hpack(link(head),natural); w:=width(u);
-  cur_tail:=adjust_tail; adjust_tail:=null;
-  end
- at y
-  begin adjust_tail:=cur_tail; pre_adjust_tail:=cur_pre_tail;
-  u:=hpack(link(head),natural); w:=width(u);
-  cur_tail:=adjust_tail; adjust_tail:=null;
-  cur_pre_tail:=pre_adjust_tail; pre_adjust_tail:=null;
-  end
- at z
-
- at x [799] - pre-vadjust
-  pop_nest; append_to_vlist(p);
-  if cur_head<>cur_tail then
-    begin link(tail):=link(cur_head); tail:=cur_tail;
-    end;
- at y
-  pop_nest;
-  if cur_pre_head <> cur_pre_tail then
-      append_list(cur_pre_head)(cur_pre_tail);
-  append_to_vlist(p);
-  if cur_head <> cur_tail then
-      append_list(cur_head)(cur_tail);
- at z
-
- at x [888] - pre-vadjust
-@ @<Append the new box to the current vertical list...@>=
-append_to_vlist(just_box);
-if adjust_head<>adjust_tail then
-  begin link(tail):=link(adjust_head); tail:=adjust_tail;
-   end;
-adjust_tail:=null
- at y
-@ |append_list| is used to append a list to |tail|.
-
- at d append_list_end(#) == tail := #; end
- at d append_list(#) == begin link(tail) := link(#); append_list_end
-
-@<Append the new box to the current vertical list...@>=
-if pre_adjust_head <> pre_adjust_tail then
-    append_list(pre_adjust_head)(pre_adjust_tail);
-pre_adjust_tail := null;
-append_to_vlist(just_box);
-if adjust_head <> adjust_tail then
-    append_list(adjust_head)(adjust_tail);
-adjust_tail := null
- at z
-
- at x
-adjust_tail:=adjust_head;
- at y
-adjust_tail:=adjust_head;
-pre_adjust_tail := pre_adjust_head;
- at z
-
- at x [1076] - pre-vadjust
-    begin append_to_vlist(cur_box);
-    if adjust_tail<>null then
-      begin if adjust_head<>adjust_tail then
-        begin link(tail):=link(adjust_head); tail:=adjust_tail;
-        end;
-      adjust_tail:=null;
-      end;
- at y
-    begin 
-        if pre_adjust_tail <> null then begin
-            if pre_adjust_head <> pre_adjust_tail then
-                append_list(pre_adjust_head)(pre_adjust_tail);
-            pre_adjust_tail := null;
-        end;
-        append_to_vlist(cur_box);
-        if adjust_tail <> null then begin
-            if adjust_head <> adjust_tail then
-                append_list(adjust_head)(adjust_tail);
-            adjust_tail := null;
-        end;
- at z
-
- at x [1085] - pre-vadjust
-adjusted_hbox_group: begin adjust_tail:=adjust_head; package(0);
- at y
-adjusted_hbox_group: begin adjust_tail:=adjust_head; 
-    pre_adjust_tail:=pre_adjust_head; package(0);
- at z
-
- at x [1099] - pre-vadjust
-saved(0):=cur_val; incr(save_ptr);
-new_save_level(insert_group); scan_left_brace; normal_paragraph;
-push_nest; mode:=-vmode; prev_depth:=ignore_depth;
-end;
- at y
-saved(0) := cur_val;
-if (cur_cmd = vadjust) and scan_keyword("pre") then
-    saved(1) := 1
-else
-    saved(1) := 0;
-save_ptr := save_ptr + 2;
-new_save_level(insert_group); scan_left_brace; normal_paragraph;
-push_nest; mode:=-vmode; prev_depth:=ignore_depth;
-end;
- at z
-
- at x [1100] - pre-vadjust
-  d:=split_max_depth; f:=floating_penalty; unsave; decr(save_ptr);
- at y
-  d:=split_max_depth; f:=floating_penalty; unsave; save_ptr := save_ptr - 2;
- at z
-
- at x [1100] - pre-vadjust
-    subtype(tail):=0; {the |subtype| is not used}
- at y
-    adjust_pre(tail) := saved(1); {the |subtype| is used for |adjust_pre|}
- at z
-
- at x [1198] - pre-vadjust
-@!t:pointer; {tail of adjustment list}
- at y
-@!t:pointer; {tail of adjustment list}
-@!pre_t:pointer; {tail of pre-adjustment list}
- at z
-
- at x [1199] - pre-vadjust
-adjust_tail:=adjust_head; b:=hpack(p,natural); p:=list_ptr(b);
-t:=adjust_tail; adjust_tail:=null;@/
- at y
-adjust_tail:=adjust_head; pre_adjust_tail:=pre_adjust_head;
-b:=hpack(p,natural); p:=list_ptr(b);
-t:=adjust_tail; adjust_tail:=null;@/
-pre_t:=pre_adjust_tail; pre_adjust_tail:=null;@/
- at z
-
- at x [1205] - pre-vadjust
-if t<>adjust_head then {migrating material comes after equation number}
-  begin link(tail):=link(adjust_head); tail:=t;
-  end;
- at y
-if t<>adjust_head then {migrating material comes after equation number}
-  begin link(tail):=link(adjust_head); tail:=t;
-  end;
-if pre_t<>pre_adjust_head then
-  begin link(tail):=link(pre_adjust_head); tail:=pre_t;
-  end;
- at z




More information about the Pkg-tetex-commits mailing list