Florian Moraru PROGRAMAREA CALCULATOARELOR în limbajul C

- cãutarea urmãtorului identificator nume de functie;
Cel putin douã dintre aceste functii au fost prezente si în programul anterior si vor fi
probabil utile si în alte aplicatii care prelucreazã fisiere sursã C.
Urmeazã functii specifice aplicatiei propuse:
// cauta urmatorul nume de functie (apel sau definire)
char* nxtfun (char * adr , char * rez) {
char * p= adr;
int i,found=0;
char * kw[4]={"if","while","for","switch"};
while (! found && (p= nxtid(p,rez))){
i=get (kw,4,rez);
if (i>=0) continue;
while (isspace(*p))p++; // ignora spatii albe
if (*p!='(')
continue; // altceva decat nume de functie
p= strchr(p+1,')')+1; // gasit nume de functie
found=1;
}
return p;
}
// listare functii apelate dar nedefinite
void listf (char * s) {
char * funs[100]; int i,nf=0; //nume functii definite
char * p=s;
char fun[100]; // un nume de functie
while ( p= nxtfun(p,fun)){ // p= adresa unui antet de functie
while (isspace(*p)) p++; // ignora eventuale spatii
if (*p=='{') // daca definitie
nf=put(funs,nf,fun); // pune definitie in tabel
else { // daca apel functie
i = get(funs,nf,fun); // cauta in functii deja definite
if (i 1);
f= fopen (argv[1],"r");
assert (f != NULL);
while ( fgets (lin,256,f))
listf (lin);
}