+++ /dev/null
-#ifndef FUNCH_\r
-#define FUNCH_\r
-\r
-#include "typemod.h"\r
-\r
-typedef struct {\r
- type_expr *type; /* parameter type */\r
- char *name; /* parameter name */\r
- char *pcomms; /* parameter comment */\r
- void *def; /* parameter default value */\r
-} parm_t;\r
-\r
-\r
-\r
-typedef struct {\r
- int Num; /* # of parameters */\r
- parm_t * parm;\r
-\r
-\r
- type_expr **typ; /* parameter types */\r
- char **nmes; /* parameter names */\r
- char **pcomms; /* parameter comments */\r
-\r
- \r
- int sn; /* # of strings */\r
- char **strs; /* string pointers */\r
- int stn; /* # of static arrays */\r
- int *st; /* pointer to static arrays */\r
- extern_t *link; /* pointer to links */\r
- int ni; /* # of initialisers */\r
- void **inzs; /* initialisers */\r
- char *comm; /* function comment */\r
-} func_t;\r
-\r
-/** func.c **/\r
-/* methods */\r
-#define getFNp(f) ((f)->Num) /* get number of parameters */\r
-#define setFNp(f,i) ((f)->Num = i)\r
-#define getFPname(f,i) ((f)->nmes[i])\r
-#define getFPnames(f) ((f)->nmes)\r
-#define setFPnames(f,s) ((f)->nmes = s)\r
-#define setFPname(f,i,s) ((f)->nmes[i] = s)\r
-#define getFPty(f,i) ((f)->typ[i])\r
-#define getFPtyList(f) ((f)->typ)\r
-#define setFPtyList(f,s) ((f)->typ = s)\r
-#define setFPty(f,i,s) ((f)->typ[i] = s) \r
-#define getFPcomm(f,i) ((f)->pcomms[i])\r
-#define getFPcomms(f) ((f)->pcomms)\r
-#define setFPcomms(f,s) ((f)->pcomms = s)\r
-#define setFPcomm(f,i,s) ((f)->pcomms[i] = s)\r
-\r
-\r
-#define getFComm(f) ((f)->comm)\r
-#define setFComm(f,s) ((f)->comm=s)\r
-\r
-void make_func(token_t * e1);\r
-void add_func_parm(func_t * f, type_expr ** type, char * name);\r
-void add_func_str(func_t * f, char *s);\r
-void add_func_static(func_t * f, int n);\r
-void add_func_initialiser(func_t * f, void *s);\r
-void free_func_inf(func_t * f);\r
-void markFunc(type_expr * type, int mark);\r
-void freeFuncComments(func_t *f);\r
-int sameFuncs(type_expr *t1, type_expr *t2);\r
-\r
-int IsVariadic(func_t *f);\r
-int hasPrototype(func_t *f);\r
-void swapFPLists(func_t *f1, func_t *f2);\r
-int gotMissingNames(func_t *f);\r
- \r
-int HasHiddenParm(type_expr *ty);\r
-#endif\r
-\r
-\r
-\r
-\r
-\r
-\r
-\r
-\r
-\r