r24348 | karl | 2011-10-20 23:59:55 +0000 (Thu, 20 Oct 2011) | 1 line branch2011: import e-ptex fixes from trunk r23688 Index: Build/source/texk/web2c/synctexdir/synctex-e-rec.ch0 =================================================================== --- Build/source/texk/web2c/synctexdir/synctex-e-rec.ch0 (revision 24347) +++ Build/source/texk/web2c/synctexdir/synctex-e-rec.ch0 (revision 24348) @@ -1,4 +1,4 @@ -Copyright (c) 2008, 2009 jerome DOT laurens AT u-bourgogne DOT fr +Copyright (c) 2008-2011 jerome DOT laurens AT u-bourgogne DOT fr This file is part of the SyncTeX package. @@ -82,21 +82,11 @@ link(prev_p):=p; @z -@x etex.ch l.4126 - if is_char_node(p) then r:=get_avail - else case type(p) of +@x etex.ch l.4186 hlist_node,vlist_node: begin r:=get_node(box_node_size); - mem[r+6]:=mem[p+6]; mem[r+5]:=mem[p+5]; {copy the last two words} - words:=5; list_ptr(r):=null; {this affects |mem[r+5]|} - end; @y - if is_char_node(p) then r:=get_avail - else case type(p) of hlist_node,vlist_node: begin r:=get_node(box_node_size); @; - mem[r+6]:=mem[p+6]; mem[r+5]:=mem[p+5]; {copy the last two words} - words:=5; list_ptr(r):=null; {this affects |mem[r+5]|} - end; @z @x synctex-e-mem.ch0 l.100 Index: Build/source/texk/web2c/eptexdir/eptex.ech =================================================================== --- Build/source/texk/web2c/eptexdir/eptex.ech (revision 24347) +++ Build/source/texk/web2c/eptexdir/eptex.ech (revision 24348) @@ -283,6 +283,19 @@ othercases goto next_p @z +@x e-pTeX: just_copy + hlist_node,vlist_node: begin r:=get_node(box_node_size); +@y + dir_node, + hlist_node,vlist_node: begin r:=get_node(box_node_size); +@z +@x e-pTeX: just_copy + words:=5; list_ptr(r):=null; {this affects |mem[r+5]|} +@y + words:=5; list_ptr(r):=null; {this affects |mem[r+5]|} + add_glue_ref(space_ptr(r)); add_glue_ref(xspace_ptr(r)); +@z + @x e-pTeX: ifcsname l.28620 buffer[m]:=info(p) mod @'400; incr(m); p:=link(p); @y