summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/alephdir/comw32.ch
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/alephdir/comw32.ch')
-rw-r--r--Build/source/texk/web2c/alephdir/comw32.ch77
1 files changed, 0 insertions, 77 deletions
diff --git a/Build/source/texk/web2c/alephdir/comw32.ch b/Build/source/texk/web2c/alephdir/comw32.ch
deleted file mode 100644
index 12afcb2d09e..00000000000
--- a/Build/source/texk/web2c/alephdir/comw32.ch
+++ /dev/null
@@ -1,77 +0,0 @@
-@x
-@!file_line_error_style_p:boolean; {output error messages with a C style. }
-@y
-@!file_line_error_style_p:boolean; {format error messages as file:line:error}
-@!halt_on_error_p:boolean; {stop at first error.}
-@!quoted_filename : boolean;
-@z
-
-@x l:1927
- ready_already:=0;
- if (history <> spotless) and (history <> warning_issued) then
-@y
- ready_already:=0;
- texmf_finish_job;
- if (history <> spotless) and (history <> warning_issued) then
-@z
-
-@x l:10101
-begin area_delimiter:=0; ext_delimiter:=0;
-@y
-begin area_delimiter:=0; ext_delimiter:=0;
-quoted_filename:=false;
-@z
-
-@x l:10111
-begin if c=" " then more_name:=false
-else begin str_room(1); append_char(c); {contribute |c| to the current string}
-@y
-begin
-if c="""" then begin
- quoted_filename:=not quoted_filename;
- more_name:=true;
-end;
-if (c=" ") and (not quoted_filename) then more_name:=false
-else begin
- if (c="*") then c:=" "
- else if (c="?") then c:="~";
- str_room(1); append_char(c); {contribute |c| to the current string}
-@z
-
-@x l:10175
-begin slow_print(a); slow_print(n); slow_print(e);
-@y
-begin texmf_print_filename (a, n, e);
-@z
-
-@x l:10184
-@d append_to_name(#)==begin c:=#; incr(k);
- if k<=file_name_size then name_of_file[k]:=xchr[c];
- end
-@y
-@d append_to_name(#)==begin c:=#; if not (c="""") then begin incr(k);
- if k<=file_name_size then name_of_file[k]:=xchr[c];
- end end
-@z
-
-@x l:13060
- print_nl("Output written on "); slow_print(output_file_name);
-@y
- print_nl("Output written on "); texmf_print_filename(0, output_file_name, 0);
-@z
-
-@x
-begin @!{|start_here|}
-@y
-begin @!{|start_here|}
-
- texmf_start_job;
-@z
-
-@x l:24891
- slow_print(log_name); print_char(".");
- end;
-@y
- texmf_print_filename(0, log_name, 0); print_char(".");
- end;
-@z