Pascal declarations

These are produced by the rpc compiler automatically from the example RPCC file. PROCEDURE f_init ( PROCEDURE f_putline ( VAR status : my_long); VAR unitno : my_int; EXTERN; VAR a_name : my_subs; VAR s_name : rpc_short; PROCEDURE f_end ( VAR l_name : rpc_short; VAR status : my_long); VAR status : my_long); EXTERN; EXTERN; PROCEDURE f_open ( PROCEDURE f_rename ( VAR unitno : my_int; VAR a_name1 : my_subs; VAR a_name : my_subs; VAR s-name1 : rpc_short; VAR s_name : rpc_short; VAR l_name1 : rpc_short; VAR l_name : rpc_short; VAR a_name2 : my_subs; VAR mode : my_int; VAR s_name2 : rpc_short; VAR nameuse : my_type; VAR l_name2 : rpc_short; VAR status : my_long); VAR t1 : my_type; EXTERN; VAR t2 : my_type; VAR status : my_long); PROCEDURE f_close ( EXTERN; VAR unitno : my_int; VAR status : my_long); PROCEDURE f_errmess ( EXTERN; VAR messno : my_long; VAR a_name : my_subs; PROCEDURE f_getline ( VAR s_name : rpc_short; VAR unitno : my_int; VAR l_name : rpc_short; VAR a_linebuf : my_subs; VAR status : my_long); VAR s_linebuf : rpc_short EXTERN; VAR l_linebuf : rpc_short VAR ch : my_int; VAR status : my_long); EXTERN; _________________________________________________________________

Tim BL