From: ceriel Date: Fri, 5 Nov 1993 15:02:57 +0000 (+0000) Subject: Added prototypes X-Git-Tag: release-5-5~264 X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=1da6506ba71747c3d80db1cbe2c93d49da523408;p=ack.git Added prototypes --- diff --git a/modules/h/.distr b/modules/h/.distr index 170ea4d68..613760fe6 100644 --- a/modules/h/.distr +++ b/modules/h/.distr @@ -1,8 +1,8 @@ +ansi.h em.h em_arith.h em_code.h em_label.h em_codeCE.h -em_codeO.h emO_code.h em_mesX.h diff --git a/modules/h/ansi.h b/modules/h/ansi.h new file mode 100644 index 000000000..b6c85fc2b --- /dev/null +++ b/modules/h/ansi.h @@ -0,0 +1,29 @@ +/* (c) copyright 1992 by the Vrije Universiteit, Amsterdam, The Netherlands. +*/ + +#ifndef __ANSI_H__INCLUDED +#define __ANSI_H__INCLUDED + +/* T O A N S I O R N O T T O A N S I ? */ + +/* $Header$ */ + +/* Define the * _PROTOTYPE macro to either expand both of its arguments + (ANSI prototypes), or only the function name (K&R prototypes). + */ + +#if __STDC__ +#include + +#define _PROTOTYPE(function, params) function params +#define _SIZET size_t +#define _CONST const + +#else + +#define _PROTOTYPE(function, params) function() +#define _SIZET unsigned int +#define _CONST + +#endif /* __STDC__ */ +#endif __ANSI_H__INCLUDED diff --git a/modules/h/em_code.h b/modules/h/em_code.h index c5574ffcf..57a9ed008 100644 --- a/modules/h/em_code.h +++ b/modules/h/em_code.h @@ -5,6 +5,25 @@ */ #include "em_mesX.h" +#include "ansi.h" + +_PROTOTYPE(void C_ms_com, (char *)); +_PROTOTYPE(void C_ms_ego, (int, arith, arith, int)); +_PROTOTYPE(void C_ms_emx, ( arith, arith)); +_PROTOTYPE(void C_ms_err, (void)); +_PROTOTYPE(void C_ms_flt, (void)); +_PROTOTYPE(void C_ms_gto, (void)); +_PROTOTYPE(void C_ms_opt, (void)); +_PROTOTYPE(void C_ms_par, (arith)); +_PROTOTYPE(void C_ms_reg, (arith, arith, int, int)); +_PROTOTYPE(void C_ms_src, (int, char *)); +_PROTOTYPE(void C_ms_stb_cst, (char *, int, int, arith)); +_PROTOTYPE(void C_ms_stb_dlb, (char *, int, int, label, arith)); +_PROTOTYPE(void C_ms_stb_dnam, (char *, int, int, char *, arith)); +_PROTOTYPE(void C_ms_stb_ilb, (char *, int, int, label)); +_PROTOTYPE(void C_ms_stb_pnam, (char *, int, int, char *)); +_PROTOTYPE(void C_ms_std, (char *, int, int)); + #ifdef PEEPHOLE #include "em_codeO.h" #include "emO_code.h" diff --git a/modules/h/em_codeCE.h b/modules/h/em_codeCE.h index 9c3f28e56..bf56b0ded 100644 --- a/modules/h/em_codeCE.h +++ b/modules/h/em_codeCE.h @@ -38,3 +38,269 @@ #define C_exa_dlb _38_C_exa_dlb #define C_dee_dnam _39_C_dee_dnam #define C_dee_dlb _40_C_dee_dlb + +_PROTOTYPE(void C_insertpart, ( int id)); +_PROTOTYPE(void C_beginpart, ( int id)); +_PROTOTYPE(void C_endpart, ( int id)); +_PROTOTYPE(void C_pro, ( char * s, arith l)); +_PROTOTYPE(void C_pro_narg, ( char * s)); +_PROTOTYPE(void C_end, ( arith l)); +_PROTOTYPE(void C_end_narg, (void)); +_PROTOTYPE(void C_df_dlb, ( label l)); +_PROTOTYPE(void C_df_dnam, ( char * s)); +_PROTOTYPE(void C_exa_dnam, ( char * s)); +_PROTOTYPE(void C_exa_dlb, ( label l)); +_PROTOTYPE(void C_exp, ( char * s)); +_PROTOTYPE(void C_ina_dnam, ( char * s)); +_PROTOTYPE(void C_ina_dlb, ( label l)); +_PROTOTYPE(void C_inp, ( char * s)); +_PROTOTYPE(void C_bss_cst, ( arith n, arith w, int i)); +_PROTOTYPE(void C_bss_icon, ( arith n, char* s, arith sz, int i)); +_PROTOTYPE(void C_bss_ucon, ( arith n, char* s, arith sz, int i)); +_PROTOTYPE(void C_bss_fcon, ( arith n, char* s, arith sz, int i)); +_PROTOTYPE(void C_bss_dnam, ( arith n, char* s, arith offs, int i)); +_PROTOTYPE(void C_bss_dlb, ( arith n, label l, arith offs, int i)); +_PROTOTYPE(void C_bss_ilb, ( arith n, label l, int i)); +_PROTOTYPE(void C_bss_pnam, ( arith n, char* s, int i)); +_PROTOTYPE(void C_hol_cst, ( arith n, arith w, int i)); +_PROTOTYPE(void C_hol_icon, ( arith n, char* s, arith sz, int i)); +_PROTOTYPE(void C_hol_ucon, ( arith n, char* s, arith sz, int i)); +_PROTOTYPE(void C_hol_fcon, ( arith n, char* s, arith sz, int i)); +_PROTOTYPE(void C_hol_dnam, ( arith n, char* s, arith offs, int i)); +_PROTOTYPE(void C_hol_dlb, ( arith n, label l, arith offs, int i)); +_PROTOTYPE(void C_hol_ilb, ( arith n, label l, int i)); +_PROTOTYPE(void C_hol_pnam, ( arith n, char* s, int i)); +_PROTOTYPE(void C_con_cst, ( arith l)); +_PROTOTYPE(void C_con_icon, ( char * val, arith siz)); +_PROTOTYPE(void C_con_ucon, ( char * val, arith siz)); +_PROTOTYPE(void C_con_fcon, ( char * val, arith siz)); +_PROTOTYPE(void C_con_scon, ( char * str, arith siz)); +_PROTOTYPE(void C_con_dnam, ( char * str, arith val)); +_PROTOTYPE(void C_con_dlb, ( label l, arith val)); +_PROTOTYPE(void C_con_ilb, ( label l)); +_PROTOTYPE(void C_con_pnam, ( char * str)); +_PROTOTYPE(void C_rom_cst, ( arith l)); +_PROTOTYPE(void C_rom_icon, ( char * val, arith siz)); +_PROTOTYPE(void C_rom_ucon, ( char * val, arith siz)); +_PROTOTYPE(void C_rom_fcon, ( char * val, arith siz)); +_PROTOTYPE(void C_rom_scon, ( char * str, arith siz)); +_PROTOTYPE(void C_rom_dnam, ( char * str, arith val)); +_PROTOTYPE(void C_rom_dlb, ( label l, arith val)); +_PROTOTYPE(void C_rom_ilb, ( label l)); +_PROTOTYPE(void C_rom_pnam, ( char * str)); +_PROTOTYPE(void C_cst, ( arith l)); +_PROTOTYPE(void C_icon, ( char * val, arith siz)); +_PROTOTYPE(void C_ucon, ( char * val, arith siz)); +_PROTOTYPE(void C_fcon, ( char * val, arith siz)); +_PROTOTYPE(void C_scon, ( char * str, arith siz)); +_PROTOTYPE(void C_dnam, ( char * str, arith val)); +_PROTOTYPE(void C_dlb, ( label l, arith val)); +_PROTOTYPE(void C_ilb, ( label l)); +_PROTOTYPE(void C_pnam, ( char * str)); +_PROTOTYPE(void C_mes_begin, ( int ms)); +_PROTOTYPE(void C_mes_end, (void)); +_PROTOTYPE(void C_exc, ( arith c1, arith c2)); +_PROTOTYPE(void C_zrl, ( arith n)); +_PROTOTYPE(void C_zrf_narg, (void)); +_PROTOTYPE(void C_zrf, ( arith n)); +_PROTOTYPE(void C_zre, ( arith n)); +_PROTOTYPE(void C_zre_dnam, ( char * s, arith n)); +_PROTOTYPE(void C_zre_dlb, ( label l, arith n)); +_PROTOTYPE(void C_zne, ( label l)); +_PROTOTYPE(void C_zlt, ( label l)); +_PROTOTYPE(void C_zle, ( label l)); +_PROTOTYPE(void C_zgt, ( label l)); +_PROTOTYPE(void C_zge, ( label l)); +_PROTOTYPE(void C_zer_narg, (void)); +_PROTOTYPE(void C_zer, ( arith n)); +_PROTOTYPE(void C_zeq, ( label l)); +_PROTOTYPE(void C_xor_narg, (void)); +_PROTOTYPE(void C_xor, ( arith n)); +_PROTOTYPE(void C_trp, (void)); +_PROTOTYPE(void C_tne, (void)); +_PROTOTYPE(void C_tlt, (void)); +_PROTOTYPE(void C_tle, (void)); +_PROTOTYPE(void C_tgt, (void)); +_PROTOTYPE(void C_tge, (void)); +_PROTOTYPE(void C_teq, (void)); +_PROTOTYPE(void C_sts_narg, (void)); +_PROTOTYPE(void C_sts, ( arith n)); +_PROTOTYPE(void C_str, ( arith n)); +_PROTOTYPE(void C_stl, ( arith n)); +_PROTOTYPE(void C_sti, ( arith n)); +_PROTOTYPE(void C_stf, ( arith n)); +_PROTOTYPE(void C_ste, ( arith n)); +_PROTOTYPE(void C_ste_dnam, ( char * s, arith n)); +_PROTOTYPE(void C_ste_dlb, ( label l, arith n)); +_PROTOTYPE(void C_sru_narg, (void)); +_PROTOTYPE(void C_sru, ( arith n)); +_PROTOTYPE(void C_sri_narg, (void)); +_PROTOTYPE(void C_sri, ( arith n)); +_PROTOTYPE(void C_slu_narg, (void)); +_PROTOTYPE(void C_slu, ( arith n)); +_PROTOTYPE(void C_sli_narg, (void)); +_PROTOTYPE(void C_sli, ( arith n)); +_PROTOTYPE(void C_sim, (void)); +_PROTOTYPE(void C_sil, ( arith n)); +_PROTOTYPE(void C_sig, (void)); +_PROTOTYPE(void C_set_narg, (void)); +_PROTOTYPE(void C_set, ( arith n)); +_PROTOTYPE(void C_sdl, ( arith n)); +_PROTOTYPE(void C_sdf, ( arith n)); +_PROTOTYPE(void C_sde, ( arith n)); +_PROTOTYPE(void C_sde_dnam, ( char * s, arith n)); +_PROTOTYPE(void C_sde_dlb, ( label l, arith n)); +_PROTOTYPE(void C_sbu_narg, (void)); +_PROTOTYPE(void C_sbu, ( arith n)); +_PROTOTYPE(void C_sbs_narg, (void)); +_PROTOTYPE(void C_sbs, ( arith n)); +_PROTOTYPE(void C_sbi_narg, (void)); +_PROTOTYPE(void C_sbi, ( arith n)); +_PROTOTYPE(void C_sbf_narg, (void)); +_PROTOTYPE(void C_sbf, ( arith n)); +_PROTOTYPE(void C_sar_narg, (void)); +_PROTOTYPE(void C_sar, ( arith n)); +_PROTOTYPE(void C_rtt, (void)); +_PROTOTYPE(void C_ror_narg, (void)); +_PROTOTYPE(void C_ror, ( arith n)); +_PROTOTYPE(void C_rol_narg, (void)); +_PROTOTYPE(void C_rol, ( arith n)); +_PROTOTYPE(void C_rmu_narg, (void)); +_PROTOTYPE(void C_rmu, ( arith n)); +_PROTOTYPE(void C_rmi_narg, (void)); +_PROTOTYPE(void C_rmi, ( arith n)); +_PROTOTYPE(void C_ret, ( arith n)); +_PROTOTYPE(void C_rck_narg, (void)); +_PROTOTYPE(void C_rck, ( arith n)); +_PROTOTYPE(void C_nop, (void)); +_PROTOTYPE(void C_ngi_narg, (void)); +_PROTOTYPE(void C_ngi, ( arith n)); +_PROTOTYPE(void C_ngf_narg, (void)); +_PROTOTYPE(void C_ngf, ( arith n)); +_PROTOTYPE(void C_mon, (void)); +_PROTOTYPE(void C_mlu_narg, (void)); +_PROTOTYPE(void C_mlu, ( arith n)); +_PROTOTYPE(void C_mli_narg, (void)); +_PROTOTYPE(void C_mli, ( arith n)); +_PROTOTYPE(void C_mlf_narg, (void)); +_PROTOTYPE(void C_mlf, ( arith n)); +_PROTOTYPE(void C_lxl, ( arith n)); +_PROTOTYPE(void C_lxa, ( arith n)); +_PROTOTYPE(void C_lpi, ( char * s)); +_PROTOTYPE(void C_lpb, (void)); +_PROTOTYPE(void C_los_narg, (void)); +_PROTOTYPE(void C_los, ( arith n)); +_PROTOTYPE(void C_lor, ( arith n)); +_PROTOTYPE(void C_lol, ( arith n)); +_PROTOTYPE(void C_loi, ( arith n)); +_PROTOTYPE(void C_lof, ( arith n)); +_PROTOTYPE(void C_loe, ( arith n)); +_PROTOTYPE(void C_loe_dnam, ( char * s, arith n)); +_PROTOTYPE(void C_loe_dlb, ( label l, arith n)); +_PROTOTYPE(void C_loc, ( arith n)); +_PROTOTYPE(void C_lni, (void)); +_PROTOTYPE(void C_lin, ( arith n)); +_PROTOTYPE(void C_lim, (void)); +_PROTOTYPE(void C_lil, ( arith n)); +_PROTOTYPE(void C_lfr, ( arith n)); +_PROTOTYPE(void C_ldl, ( arith n)); +_PROTOTYPE(void C_ldf, ( arith n)); +_PROTOTYPE(void C_lde, ( arith n)); +_PROTOTYPE(void C_lde_dnam, ( char * s, arith n)); +_PROTOTYPE(void C_lde_dlb, ( label l, arith n)); +_PROTOTYPE(void C_ldc, ( arith n)); +_PROTOTYPE(void C_lar_narg, (void)); +_PROTOTYPE(void C_lar, ( arith n)); +_PROTOTYPE(void C_lal, ( arith n)); +_PROTOTYPE(void C_lae, ( arith n)); +_PROTOTYPE(void C_lae_dnam, ( char * s, arith n)); +_PROTOTYPE(void C_lae_dlb, ( label l, arith n)); +_PROTOTYPE(void C_ior_narg, (void)); +_PROTOTYPE(void C_ior, ( arith n)); +_PROTOTYPE(void C_inn_narg, (void)); +_PROTOTYPE(void C_inn, ( arith n)); +_PROTOTYPE(void C_inl, ( arith n)); +_PROTOTYPE(void C_ine, ( arith n)); +_PROTOTYPE(void C_ine_dnam, ( char * s, arith n)); +_PROTOTYPE(void C_ine_dlb, ( label l, arith n)); +_PROTOTYPE(void C_inc, (void)); +_PROTOTYPE(void C_gto, ( arith n)); +_PROTOTYPE(void C_gto_dnam, ( char * s, arith n)); +_PROTOTYPE(void C_gto_dlb, ( label l, arith n)); +_PROTOTYPE(void C_fil, ( arith n)); +_PROTOTYPE(void C_fil_dnam, ( char * s, arith n)); +_PROTOTYPE(void C_fil_dlb, ( label l, arith n)); +_PROTOTYPE(void C_fif_narg, (void)); +_PROTOTYPE(void C_fif, ( arith n)); +_PROTOTYPE(void C_fef_narg, (void)); +_PROTOTYPE(void C_fef, ( arith n)); +_PROTOTYPE(void C_exg_narg, (void)); +_PROTOTYPE(void C_exg, ( arith n)); +_PROTOTYPE(void C_dvu_narg, (void)); +_PROTOTYPE(void C_dvu, ( arith n)); +_PROTOTYPE(void C_dvi_narg, (void)); +_PROTOTYPE(void C_dvi, ( arith n)); +_PROTOTYPE(void C_dvf_narg, (void)); +_PROTOTYPE(void C_dvf, ( arith n)); +_PROTOTYPE(void C_dus_narg, (void)); +_PROTOTYPE(void C_dus, ( arith n)); +_PROTOTYPE(void C_dup, ( arith n)); +_PROTOTYPE(void C_del, ( arith n)); +_PROTOTYPE(void C_dee, ( arith n)); +_PROTOTYPE(void C_dee_dnam, ( char * s, arith n)); +_PROTOTYPE(void C_dee_dlb, ( label l, arith n)); +_PROTOTYPE(void C_dec, (void)); +_PROTOTYPE(void C_dch, (void)); +_PROTOTYPE(void C_cuu, (void)); +_PROTOTYPE(void C_cui, (void)); +_PROTOTYPE(void C_cuf, (void)); +_PROTOTYPE(void C_csb_narg, (void)); +_PROTOTYPE(void C_csb, ( arith n)); +_PROTOTYPE(void C_csa_narg, (void)); +_PROTOTYPE(void C_csa, ( arith n)); +_PROTOTYPE(void C_com_narg, (void)); +_PROTOTYPE(void C_com, ( arith n)); +_PROTOTYPE(void C_cmu_narg, (void)); +_PROTOTYPE(void C_cmu, ( arith n)); +_PROTOTYPE(void C_cms_narg, (void)); +_PROTOTYPE(void C_cms, ( arith n)); +_PROTOTYPE(void C_cmp, (void)); +_PROTOTYPE(void C_cmi_narg, (void)); +_PROTOTYPE(void C_cmi, ( arith n)); +_PROTOTYPE(void C_cmf_narg, (void)); +_PROTOTYPE(void C_cmf, ( arith n)); +_PROTOTYPE(void C_ciu, (void)); +_PROTOTYPE(void C_cii, (void)); +_PROTOTYPE(void C_cif, (void)); +_PROTOTYPE(void C_cfu, (void)); +_PROTOTYPE(void C_cfi, (void)); +_PROTOTYPE(void C_cff, (void)); +_PROTOTYPE(void C_cal, ( char * s)); +_PROTOTYPE(void C_cai, (void)); +_PROTOTYPE(void C_bra, ( label l)); +_PROTOTYPE(void C_bne, ( label l)); +_PROTOTYPE(void C_blt, ( label l)); +_PROTOTYPE(void C_bls_narg, (void)); +_PROTOTYPE(void C_bls, ( arith n)); +_PROTOTYPE(void C_blm, ( arith n)); +_PROTOTYPE(void C_ble, ( label l)); +_PROTOTYPE(void C_bgt, ( label l)); +_PROTOTYPE(void C_bge, ( label l)); +_PROTOTYPE(void C_beq, ( label l)); +_PROTOTYPE(void C_ass_narg, (void)); +_PROTOTYPE(void C_ass, ( arith n)); +_PROTOTYPE(void C_asp, ( arith n)); +_PROTOTYPE(void C_and_narg, (void)); +_PROTOTYPE(void C_and, ( arith n)); +_PROTOTYPE(void C_adu_narg, (void)); +_PROTOTYPE(void C_adu, ( arith n)); +_PROTOTYPE(void C_ads_narg, (void)); +_PROTOTYPE(void C_ads, ( arith n)); +_PROTOTYPE(void C_adp, ( arith n)); +_PROTOTYPE(void C_adi_narg, (void)); +_PROTOTYPE(void C_adi, ( arith n)); +_PROTOTYPE(void C_adf_narg, (void)); +_PROTOTYPE(void C_adf, ( arith n)); +_PROTOTYPE(void C_aar_narg, (void)); +_PROTOTYPE(void C_aar, ( arith n)); +_PROTOTYPE(void C_df_ilb, ( label l));