diff options
Diffstat (limited to 'Build/source/texk/web2c/xetexdir')
-rw-r--r-- | Build/source/texk/web2c/xetexdir/am/xetex.am | 53 | ||||
-rw-r--r-- | Build/source/texk/web2c/xetexdir/tex.mod | 87 |
2 files changed, 1 insertions, 139 deletions
diff --git a/Build/source/texk/web2c/xetexdir/am/xetex.am b/Build/source/texk/web2c/xetexdir/am/xetex.am index 5250fd4dc88..e2665c2ab24 100644 --- a/Build/source/texk/web2c/xetexdir/am/xetex.am +++ b/Build/source/texk/web2c/xetexdir/am/xetex.am @@ -1,6 +1,6 @@ ## texk/web2c/xetexdir/am/xetex.am: Makefile fragment for XeTeX. ## -## Copyright (C) 2009-2012 Peter Breitenlohner <tex-live@tug.org> +## Copyright (C) 2009-2013 Peter Breitenlohner <tex-live@tug.org> ## You may freely use, modify and/or distribute this file. ## XeTeX @@ -96,57 +96,6 @@ xetex_ch_srcs = \ $(xetex_post_ch_synctex) \ tex-binpool.ch -## Merging in XeTeX change files - begin -if XETEX_SYNCTEX -Xold_ch_synctex = \ - synctexdir/synctex-mem.ch0 \ - synctexdir/synctex-e-mem.ch0 \ - synctexdir/synctex-e-mem.ch1 \ - synctexdir/synctex-xe-mem.ch2 \ - synctexdir/synctex-rec.ch0 \ - synctexdir/synctex-e-rec.ch0 \ - synctexdir/synctex-xe-rec.ch2 -Xold_post_ch_synctex = \ - synctexdir/synctex-xe-rec.ch3 -endif XETEX_SYNCTEX - -Xold.p Xold.pool: Xold-tangle - @$(xe_tangle) Xold -Xold-tangle: otangle$(EXEEXT) Xold.web tangle-sh - @$(xe_tangle) Xold -Xold.web: tie$(EXEEXT) $(Xold_web_srcs) - $(tie) -m Xold.web $(Xold_web_srcs) -Xold_web_srcs = \ - tex.web \ - etexdir/etex.ch \ - etexdir/tex.ch0 \ - tex.ch \ - xetexdir/tex.mod \ - etexdir/tex.ch1 \ - etexdir/tex.ech \ - tex-binpool.ch \ - $(Xold_ch_synctex) \ - xetex-orig.ch \ - xetex-latex3.ch \ - xetex-hz.ch \ - $(Xold_post_ch_synctex) -# -Xnew.web: tie$(EXEEXT) xetexdir/xetex.web xetex.ch - $(tie) -m Xnew.web xetexdir/xetex.web xetex.ch -# -Xweb.diff: Xold.web Xnew.web - diff -u Xold.web Xnew.web >Xweb.diff; : -Xp.diff: Xold.p xetex.p - diff -u Xold.p xetex.p >Xp.diff; : -Xpool.diff: Xold.pool xetex.pool - diff -u Xold.pool xetex.pool >Xpool.diff; : -X.diff: Xweb.diff Xp.diff Xpool.diff - cat Xweb.diff Xp.diff Xpool.diff >X.diff -# -EXTRA_DIST += $(Xold_web_srcs) -DISTCLEANFILES += X* -## Merging in XeTeX change files - end - ## EXTRA_DIST += $(xetex_web_srcs) $(xetex_ch_srcs) xetexdir/xetex.defines diff --git a/Build/source/texk/web2c/xetexdir/tex.mod b/Build/source/texk/web2c/xetexdir/tex.mod deleted file mode 100644 index af75344b1f5..00000000000 --- a/Build/source/texk/web2c/xetexdir/tex.mod +++ /dev/null @@ -1,87 +0,0 @@ -% Compensate recent changes in ../tex.ch - -@x [5.71] encTeX - native buffer printing -if last<>first then for k:=first to last-1 do print(buffer[k]); -@y -k:=first; while k < last do begin print_buffer(k) end; -@z - -@x [29.518] l.10042 - print_file_name: quote if spaces in names. -some operating systems put the file area last instead of first.) -@^system dependencies@> - -@d check_quoted(#) == {check if string |#| needs quoting} -if #<>0 then begin - j:=str_start[#]; - while (not must_quote) and (j<str_start[#+1]) do begin - must_quote:=str_pool[j]=" "; incr(j); - end; -end -@# -@d print_quoted(#) == {print string |#|, omitting quotes} -if #<>0 then - for j:=str_start[#] to str_start[#+1]-1 do - if so(str_pool[j])<>"""" then - print(so(str_pool[j])) -@y -some operating systems put the file area last instead of first.) -@^system dependencies@> -@z - -@x [29.518] l.10042 - print_file_name: quote if spaces in names. -check_quoted(a); check_quoted(n); check_quoted(e); -@y -if a<>0 then begin - j:=str_start[a]; - while (not must_quote) and (j<str_start[a+1]) do begin - must_quote:=str_pool[j]=" "; incr(j); - end; -end; -if n<>0 then begin - j:=str_start[n]; - while (not must_quote) and (j<str_start[n+1]) do begin - must_quote:=str_pool[j]=" "; incr(j); - end; -end; -if e<>0 then begin - j:=str_start[e]; - while (not must_quote) and (j<str_start[e+1]) do begin - must_quote:=str_pool[j]=" "; incr(j); - end; -end; -@z - -@x [29.518] l.10042 - print_file_name: quote if spaces in names. -print_quoted(a); print_quoted(n); print_quoted(e); -@y -if a<>0 then - for j:=str_start[a] to str_start[a+1]-1 do - if so(str_pool[j])<>"""" then - print(so(str_pool[j])); -if n<>0 then - for j:=str_start[n] to str_start[n+1]-1 do - if so(str_pool[j])<>"""" then - print(so(str_pool[j])); -if e<>0 then - for j:=str_start[e] to str_start[e+1]-1 do - if so(str_pool[j])<>"""" then - print(so(str_pool[j])); -@z - -@x [48.1138] l.21648 - encTeX: \endmubyte primitive -begin print_err("Extra "); print_esc("endcsname"); -@.Extra \\endcsname@> -help1("I'm ignoring this, since I wasn't doing a \csname."); -@y -begin -if cur_chr = 10 then -begin - print_err("Extra "); print_esc("endmubyte"); -@.Extra \\endmubyte@> - help1("I'm ignoring this, since I wasn't doing a \mubyte."); -end else begin - print_err("Extra "); print_esc("endcsname"); -@.Extra \\endcsname@> - help1("I'm ignoring this, since I wasn't doing a \csname."); -end; -@z |