Lines Matching refs:internal
100 #define putptr(f,p) (internal.ptr=(char*)(p),sfwrite(f,&internal.ptr,sizeof(internal.ptr)))
105 #define ropen(f,m) ((f)==internal.openfile?(internal.openfile=0,internal.openfd):open(f,m))
106 #define rsfopen(f) ((f)==internal.openfile?(internal.openfile=0,sfnew(NiL,NiL,SF_UNBOUND,internal.openfd,SF_READ)):sfopen(NiL,f,"re"))
127 #define freelist(x) do{if(x){(x)->rule=(Rule_t*)internal.freelists;internal.freelists=(char*)(x);}}while(0)
128 #define freerule(r) do{zero(*r);*((char**)r)=internal.freerules;internal.freerules=(char*)(r);}while(0)
129 #define freevar(v) do{(v)->property&=(V_free|V_import);*((char**)v)=internal.freevars;internal.freevars=(char*)(v);}while(0)
131 #define newlist(x) do{if(x=(List_t*)internal.freelists){if(x->next){x=x->next;*((char**)internal.freelists)=(char*)x->next;}else internal.freelists=(char*)x->rule;}else x=(List_t*)newchunk(&internal.freelists,sizeof(List_t));}while(0)
132 #define newrule(r) do{if(r=(Rule_t*)internal.freerules){internal.freerules=(*((char**)r));zero(*r);}else r=(Rule_t*)newchunk(&internal.freerules,sizeof(Rule_t));}while(0)
133 #define newvar(v) do{if(v=(Var_t*)internal.freevars){internal.freevars=(*((char**)v));}else v=(Var_t*)newchunk(&internal.freevars,sizeof(Var_t));}while(0)
226 #define NAME_intvar 0x040 /* internal variable name */
525 typedef struct Internal_s /* internal rule and list info */
604 Rule_t* internal; /* .INTERNAL rule pointer */
636 * miscellaneous internal info
649 char* issource; /* internal.source* match pat */
655 int pwdlen; /* strlen(internal.pwd) */
819 unsigned char val; /* internal.val in use */
908 extern Internal_t internal; /* internal rule and list info */
915 extern short ctypes[]; /* internal character types */