summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/omegadir/comfilter.ch
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/omegadir/comfilter.ch')
-rw-r--r--Build/source/texk/web2c/omegadir/comfilter.ch123
1 files changed, 0 insertions, 123 deletions
diff --git a/Build/source/texk/web2c/omegadir/comfilter.ch b/Build/source/texk/web2c/omegadir/comfilter.ch
deleted file mode 100644
index 64499611753..00000000000
--- a/Build/source/texk/web2c/omegadir/comfilter.ch
+++ /dev/null
@@ -1,123 +0,0 @@
-% comfilter.ch: Local adaptations for file omfilter.ch
-%
-% This file is part of Omega,
-% which is based on the web2c distribution of TeX,
-%
-% Copyright (c) 1994--2001 John Plaice and Yannis Haralambous
-%
-% Omega is free software; you can redistribute it and/or modify
-% it under the terms of the GNU General Public License as published by
-% the Free Software Foundation; either version 2 of the License, or
-% (at your option) any later version.
-%
-% Omega is distributed in the hope that it will be useful,
-% but WITHOUT ANY WARRANTY; without even the implied warranty of
-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-% GNU General Public License for more details.
-%
-% You should have received a copy of the GNU General Public License
-% along with Omega; if not, write to the Free Software Foundation, Inc.,
-% 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
-%
-%---------------------------------------
-@x
-@!inf_ocp_list_size = 1000;
-@y
-@!inf_ocp_list_size = 1000;
-@!sup_ocp_buf_size = 1000000;
-@!inf_ocp_buf_size = 1000;
-@!sup_ocp_stack_size = 1000000;
-@!inf_ocp_stack_size = 1000;
-@z
-%---------------------------------------
-@x
-@!ocp_list_size:integer;
-@y
-@!ocp_list_size:integer;
-@!ocp_buf_size:integer;
-@!ocp_stack_size:integer;
-@z
-%---------------------------------------
-@x
-for k:=0 to active_max_ptr-1 do dump_wd(active_info[k]);
-print_ln; print_int(active_max_ptr); print(" words of active ocps");
-
-@ @<Undump the active ocp information@>=
-undump_size(0)(active_mem_size)('active start point')(active_min_ptr);
-undump_size(0)(active_mem_size)('active mem size')(active_max_ptr);
-for k:=0 to active_max_ptr-1 do undump_wd(active_info[k]);
-@y
-dump_things(active_info[0], active_max_ptr);
-print_ln; print_int(active_max_ptr); print(" words of active ocps");
-
-@ @<Undump the active ocp information@>=
-undump_size(0)(active_mem_size)('active start point')(active_min_ptr);
-undump_size(0)(active_mem_size)('active mem size')(active_max_ptr);
-undump_things(active_info[0], active_max_ptr);
-@z
-%---------------------------------------
-@x
- setup_bound_var(1000)('ocp_list_size')(ocp_list_size);
-@y
- setup_bound_var(1000)('ocp_list_size')(ocp_list_size);
- setup_bound_var(1000)('ocp_buf_size')(ocp_buf_size);
- setup_bound_var(1000)('ocp_stack_size')(ocp_stack_size);
-@z
-%---------------------------------------
-@x
- ocp_list_list:=xmalloc_array (ocp_list_index, ocp_list_size);
-@y
- ocp_list_list:=xmalloc_array (ocp_list_index, ocp_list_size);
- otp_init_input_buf:=xmalloc_array (quarterword, ocp_buf_size);
- otp_input_buf:=xmalloc_array (quarterword, ocp_buf_size);
- otp_output_buf:=xmalloc_array (quarterword, ocp_buf_size);
- otp_stack_buf:=xmalloc_array (quarterword, ocp_stack_size);
- otp_calcs:=xmalloc_array (halfword, ocp_stack_size);
- otp_states:=xmalloc_array (halfword, ocp_stack_size);
-@z
-%---------------------------------------
-@x
-@!otp_init_input_buf:array[0..20000] of quarterword;
-
-@!otp_input_start:halfword;
-@!otp_input_last:halfword;
-@!otp_input_end:halfword;
-@!otp_input_buf:array[0..20000] of quarterword;
-
-@!otp_output_end:halfword;
-@!otp_output_buf:array[0..20000] of quarterword;
-
-@!otp_stack_used:halfword;
-@!otp_stack_last:halfword;
-@!otp_stack_new:halfword;
-@!otp_stack_buf:array[0..1000] of quarterword;
-
-@!otp_pc:halfword;
-
-@!otp_calc_ptr:halfword;
-@!otp_calcs:array[0..1000] of halfword;
-@!otp_state_ptr:halfword;
-@!otp_states:array[0..1000] of halfword;
-@y
-@!otp_init_input_buf:^quarterword;
-
-@!otp_input_start:halfword;
-@!otp_input_last:halfword;
-@!otp_input_end:halfword;
-@!otp_input_buf:^quarterword;
-
-@!otp_output_end:halfword;
-@!otp_output_buf:^quarterword;
-
-@!otp_stack_used:halfword;
-@!otp_stack_last:halfword;
-@!otp_stack_new:halfword;
-@!otp_stack_buf:^quarterword;
-
-@!otp_pc:halfword;
-
-@!otp_calc_ptr:halfword;
-@!otp_calcs:^halfword;
-@!otp_state_ptr:halfword;
-@!otp_states:^halfword;
-@z