
<<PLtoTF.mod>>
<<Last Edited by: Plass, December 30, 1982 4:26 pm>>
<<Last Edited by: Ramshaw, September 23, 1983 10:43 am>>
    <<Pavel, October 23, 1985 11:03:01 am PDT>>
(configuration p_lto_t_f(basic_time, commander, convert, f_s, i_o, rope, safe_storage, unsafe_storage);
definitions pascal_basic; external;
definitions pascal_wizard_files; external;
program pascal_basic_impl; external;
program pascal_wizard_files_impl; external;
definitions junk; trash;
definitions p_lto_t_f_private(pascal_basic*, pascal_wizard_files*); forward;
definitions p_lto_t_f_externals(pascal_basic*, pascal_wizard_files*, p_lto_t_f_private*); forward;
program p_lto_t_f_main(pascal_basic, pascal_wizard_files, p_lto_t_f_private, p_lto_t_f_externals); forward;
program p_lto_t_f_vars1(pascal_basic, pascal_wizard_files*, p_lto_t_f_private*); forward;
program p_lto_t_f_vars2(pascal_basic, pascal_wizard_files*, p_lto_t_f_private*); forward;
program p_lto_t_f_externals_impl.hint$(pascal_basic, pascal_wizard_files, p_lto_t_f_private); forward;
program p_lto_t_f1_impl(pascal_basic, pascal_wizard_files, p_lto_t_f_private, p_lto_t_f_externals); forward;
program p_lto_t_f2_impl(pascal_basic*, pascal_wizard_files, p_lto_t_f_private, p_lto_t_f_externals*); forward;
program p_lto_t_f3_impl(pascal_basic, pascal_wizard_files, p_lto_t_f_private, p_lto_t_f_externals*); forward;
program p_lto_t_f4_impl(pascal_basic, pascal_wizard_files, p_lto_t_f_private, p_lto_t_f_externals*); forward;
program p_lto_t_f5_impl(pascal_basic, pascal_wizard_files, p_lto_t_f_private, p_lto_t_f_externals*); forward;
begin
p_lto_t_f_externals, p_lto_t_f_externals_impl := tty_rewrite, byte_file_rewrite, file_reset, file_close, byte_file_close;
p_lto_t_f_private, p_lto_t_f1_impl := initialize, show_error_context, fill_buffer, get_letter_or_digit, get_next;
p_lto_t_f_private, p_lto_t_f2_impl := skip_to_end_of_item, finish_the_property, lookup, enter_name, get_name, get_byte;
p_lto_t_f_private, p_lto_t_f3_impl := get_four_bytes, get_fix, sort_in, min_cover, shorten, set_indices, junk_error, 
read_four_bytes;
p_lto_t_f_private, p_lto_t_f4_impl := write_byte, read_bcpl, check_tag, print_octal, out_scaled, param_enter;
p_lto_t_f_private, p_lto_t_f5_impl := name_enter, read_lig_kern, read_char_info, read_input, corr_and_check;
p_lto_t_f_private, p_lto_t_f_vars1  := pl_file, tfm_file, xord, line, good_indent, indent, level;
p_lto_t_f_private, p_lto_t_f_vars2  := $other_vars$, $other_types$, $other_consts$;
junk, p_lto_t_f_main  := $rest$;
end) := p_lto_t_f.pas;

INVENTFILENAMES FALSE;
MAKEFILE compile_p_lto_t_f;
TARGET CEDAR;
<<>>