$save nolist cr_tab: PROCEDURE EXTERNAL; end cr_tab; lookup: PROCEDURE(name_ptr, pred_ptr) POINTER EXTERNAL; DECLARE /* params */ name_ptr POINTER, pred_ptr POINTER; end lookup; get_sock: PROCEDURE(name_ptr, sock_ptr_ptr) BYTE EXTERNAL; DECLARE /* params */ name_ptr POINTER, sock_ptr_ptr POINTER; end get_sock; insert_name: PROCEDURE(socket, new_name_ptr, stat_ptr) BYTE EXTERNAL; DECLARE /* params */ socket DWORD, new_name_ptr POINTER, stat_ptr POINTER; end insert_name; delete_name: PROCEDURE(name_ptr) BYTE EXTERNAL; DECLARE /* params */ name_ptr POINTER; end delete_name; change_sock: PROCEDURE(name_ptr, sock, status_ptr) BYTE EXTERNAL; DECLARE /* params */ name_ptr POINTER, sock DWORD, status_ptr POINTER; end change_sock; get_table: PROCEDURE(table_ptr_ptr, tab_size_ptr) BYTE EXTERNAL; DECLARE /* params */ table_ptr_ptr POINTER, tab_size_ptr POINTER; end get_table; $restore˙