| 964 | } |
| 965 | } |
| 966 | static void iiRunInit(package p) |
| 967 | { |
| 968 | idhdl h=p->idroot->get("mod_init",0); |
| 969 | if (h==NULL) return; |
| 970 | if (IDTYP(h)==PROC_CMD) |
| 971 | { |
| 972 | int save=yylineno; |
| 973 | myynest++; |
| 974 | // procinfo *pi=(procinfo*)IDDATA(h); |
| 975 | //PrintS("mod_init found\n"); |
| 976 | iiMake_proc(h,p,NULL); |
| 977 | myynest--; |
| 978 | yylineno=save; |
| 979 | } |
| 980 | } |
| 981 | /*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*/ |
| 982 | BOOLEAN iiLoadLIB(FILE *fp, const char *libnamebuf, const char*newlib, |
| 983 | idhdl pl, BOOLEAN autoexport, BOOLEAN tellerror) |
no test coverage detected