static void traiteErr(int n, char * L)
{
int v;
ERROR=n;
if (D_Cod==0) {
if (ECHOOFF) printf("\n");
/* if (InDebugFct==0) fprintf(stderr,"\n"); A VOIR ! */
printf("%s : %s !!\a\n",L,TabErr[n]);
if (InDebugFct==0) fprintf(stderr,"%s : %s !!\a\n",L,TabErr[n]);
}
if (inSonProc) exit(1);
if (fctEnCours) {
if (D_Cod==0) ErrPrintf("Compilation aborted !\n");
else
if (ADDRONE == VIDE) ErrPrintf("Inside compilation aborted !\n");
_MODIF_fctEnCours_(0);
rmLastFct();
}
if (ADDRONE != VIDE) return;
if (FD_IN) {
printf("In loading file %s : line %d !\n", getFDname(),getFDlig());
if (InDebugFct==0) fprintf(stderr, "In loading file %s : line %d !\n", getFDname(),getFDlig());
closeFD();
}
if (iTERM) {
printf("In loading stdin : line %d !\n", getFDlig());
if (InDebugFct==0) fprintf(stderr,"In loading stdin : line %d !\n", getFDlig());
close(FD_IN); /* pipe ou autre */
v = dup(iTERM); /* stdin on term */
iTERM = 0;
}
}
void IF_ExecCSf(void)
{
char * f;
void *C;
f = getString();
if (f != NULL) {
C = VIDE;
if (strlen(f)>0) C = makeFunction(f);
free((void*)f);
if (C != VIDE) {
IF_execFct("_f");
rmLastFct();
}
}
}
