-
Notifications
You must be signed in to change notification settings - Fork 68
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
{,e}uptex: Copy {,e}ptex source files to clean up building environment
git-svn-id: svn://tug.org/texlive/trunk/Build/source@69767 c570f23f-e606-0410-a88d-b1316a301751
- Loading branch information
Showing
21 changed files
with
20,698 additions
and
29 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -1,3 +1,13 @@ | ||
| 2024-02-10 TANAKA Takuji <[email protected]> | ||
|
|
||
| * eptex_version.h, eptex.ech, etex.ch{0,1}, | ||
| {char-warning-eptex,fam256,pdfutils,suppresserrors}.ch, | ||
| eptrip/eptrip.{diffs,log,tex}, eptrip/texmf.cnf, | ||
| tests/pdfprimitive-test.tex, am/euptex.am: | ||
| Copy eptex source files from ../eptexdir | ||
| to cleaning up building environment. | ||
| https://github.com/texjporg/tex-jp-build/issues/32 | ||
|
|
||
| 2023-12-24 TANAKA Takuji <[email protected]> | ||
|
|
||
| * wcfname{,0}.test: | ||
|
|
||
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,101 @@ | ||
| % $Id$ | ||
| % Public domain. See ../pdftexdir/char-warning-pdftex.ch for info. | ||
|
|
||
| @x [30] If \tracinglostchars > 2, then promote full errors. | ||
| @p procedure char_warning(@!f:internal_font_number;@!c:eight_bits); | ||
| var @!l:0..255; {small indices or counters} | ||
| old_setting: integer; {saved value of |tracing_online|} | ||
| begin if tracing_lost_chars>0 then | ||
| begin old_setting:=tracing_online; | ||
| if eTeX_ex and(tracing_lost_chars>1) then tracing_online:=1; | ||
| begin begin_diagnostic; | ||
| print_nl("Missing character: There is no "); | ||
| @.Missing character@> | ||
| if (c<" ")or(c>"~") then | ||
| begin print_char("^"); print_char("^"); | ||
| if c<64 then print_char(c+64) | ||
| else if c<128 then print_char(c-64) | ||
| else begin print_lc_hex(c div 16); print_lc_hex(c mod 16); end | ||
| end | ||
| else print_ASCII(c); | ||
| print(" in font "); | ||
| slow_print(font_name[f]); print_char("!"); end_diagnostic(false); | ||
| end; | ||
| tracing_online:=old_setting; | ||
| end; | ||
| end; | ||
| @y | ||
| @p procedure char_warning(@!f:internal_font_number;@!c:eight_bits); | ||
| var @!l:0..255; {small indices or counters} | ||
| old_setting: integer; {saved value of |tracing_online|} | ||
| begin if tracing_lost_chars>0 then | ||
| begin old_setting:=tracing_online; | ||
| if eTeX_ex and(tracing_lost_chars>1) then tracing_online:=1; | ||
| if tracing_lost_chars > 2 then | ||
| print_err("Missing character: There is no ") | ||
| else begin | ||
| begin_diagnostic; | ||
| print_nl("Missing character: There is no ") | ||
| end; | ||
| @.Missing character@> | ||
| if (c<" ")or(c>"~") then begin | ||
| print_char("^"); print_char("^"); | ||
| if c<64 then print_char(c+64) | ||
| else if c<128 then print_char(c-64) | ||
| else begin print_lc_hex(c div 16); print_lc_hex(c mod 16); end | ||
| end | ||
| else print_ASCII(c); | ||
| if tracing_lost_chars > 2 then begin | ||
| print(" ("); | ||
| print_hex(c); | ||
| print(")"); | ||
| end; | ||
| print(" in font "); | ||
| slow_print(font_name[f]); | ||
| if tracing_lost_chars < 3 then print_char("!"); | ||
| tracing_online:=old_setting; | ||
| if tracing_lost_chars > 2 then begin | ||
| help0; | ||
| error; | ||
| end else end_diagnostic(false); | ||
| end; {of |tracing_lost_chars>0|} | ||
| end; {of procedure} | ||
| @z | ||
|
|
||
| @x [30] Another warning for (u)pTeX. | ||
| @p procedure char_warning_jis(@!f:internal_font_number;@!jc:KANJI_code); | ||
| begin if tracing_lost_chars>0 then | ||
| begin begin_diagnostic; | ||
| print_nl("Character "); print_kanji(jc); print(" ("); | ||
| print_hex(jc); print(") cannot be typeset in JIS-encoded JFM "); | ||
| slow_print(font_name[f]); | ||
| print_char(","); print_nl("so I use .notdef glyph instead."); | ||
| end_diagnostic(false); | ||
| end; | ||
| end; | ||
| @y | ||
| @p procedure char_warning_jis(@!f:internal_font_number;@!jc:KANJI_code); | ||
| var old_setting: integer; {saved value of |tracing_online|} | ||
| begin if tracing_lost_chars>0 then | ||
| begin old_setting:=tracing_online; | ||
| if eTeX_ex and(tracing_lost_chars>1) then tracing_online:=1; | ||
| if tracing_lost_chars > 2 then | ||
| print_err("Character ") | ||
| else begin | ||
| begin_diagnostic; | ||
| print_nl("Character ") | ||
| end; | ||
| print_kanji(jc); print(" ("); | ||
| print_hex(jc); print(") cannot be typeset in JIS-encoded JFM "); | ||
| slow_print(font_name[f]); | ||
| print_char(","); | ||
| if tracing_lost_chars > 2 then | ||
| begin print_nl(" so I use .notdef glyph instead"); | ||
| help0; error; end | ||
| else | ||
| begin print_nl("so I use .notdef glyph instead."); | ||
| end_diagnostic(false); end; | ||
| tracing_online:=old_setting; | ||
| end; {of |tracing_lost_chars>0|} | ||
| end; {of procedure} | ||
| @z |
Oops, something went wrong.