<> <> (configuration g_f_type(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 g_f_type_private(pascal_basic*, pascal_wizard_files*); forward; program g_f_type_externals_impl.hint$(pascal_wizard_files); forward; program g_f_type_impl1(pascal_basic, pascal_wizard_files, g_f_type_private); forward; program g_f_type_impl2(pascal_basic, pascal_wizard_files, g_f_type_private); forward; begin g_f_type_private, g_f_type_externals_impl := tty_reset, tty_rewrite, byte_file_reset, file_rewrite, file_close, byte_file_close; g_f_type_private, g_f_type_impl1 := initialize, input_ln, get_integer, lower_casify, flush_text, out_text, print_scaled, first_par, dialog, $rest$; g_f_type_private, g_f_type_impl2 := open_gf_file, get_byte, signed_byte, get_two_bytes, signed_pair, get_three_bytes, signed_trio, signed_quad, do_char, read_postamble; end) := g_f_type.pas; INVENTFILENAMES FALSE; MAKEFILE compile_g_f_type; TARGET cedar;