From af0f549fbb5ef366f8cda14397640cbb1bf6f78d Mon Sep 17 00:00:00 2001 From: TANAKA Takuji Date: Fri, 16 Dec 2022 21:50:46 +0900 Subject: [PATCH] (u)ptex-{euc,sjis}: remove debug codes (#136) --- source/texk/web2c/lib/texmfmp.c | 5 ----- source/texk/web2c/ptexdir/ptex-base.ch | 10 +--------- 2 files changed, 1 insertion(+), 14 deletions(-) diff --git a/source/texk/web2c/lib/texmfmp.c b/source/texk/web2c/lib/texmfmp.c index b39af2606..b73403135 100644 --- a/source/texk/web2c/lib/texmfmp.c +++ b/source/texk/web2c/lib/texmfmp.c @@ -850,11 +850,6 @@ maininit (int ac, string *av) get_command_line_args_utf8(enc, &argc, &argv); #endif -#if IS_pTeX && !IS_upTeX && !defined(WIN32) - fprintf(stderr, "maininit: %d\n", get_internal_enc()); -// ptenc_get_command_line_args(&argc, &argv); -#endif - /* If the user says --help or --version, we need to notice early. And since we want the --ini option, have to do it before getting into the web (which would read the base file, etc.). */ diff --git a/source/texk/web2c/ptexdir/ptex-base.ch b/source/texk/web2c/ptexdir/ptex-base.ch index 9b23eead1..b0b5db2b3 100644 --- a/source/texk/web2c/ptexdir/ptex-base.ch +++ b/source/texk/web2c/ptexdir/ptex-base.ch @@ -6861,18 +6861,10 @@ undump_things(char_base[null_font], font_ptr+1-null_font); font_info:=xmalloc_array (memory_word, font_mem_size); @z -@x -- DEBUG! +@x fix_date_and_time;@/ @y last:=ptenc_conv_first_line(loc, last, buffer, buf_size); -{ print_nl("debug 1st line "); print_int(loc); print(" "); -for k:=0 to last do begin - if k=loc then print(">"); - if (buffer[k]<@"20)or(buffer[k]>@"7e) then - begin print("["); print_hex(buffer[k]); print("]"); end - else print(buffer[k]); -end; -print_nl(""); } fix_date_and_time;@/ @z