No parse tree submitted to IFeval:

Prevent segfault and emit error message
This commit is contained in:
Holger Vogt 2021-06-20 14:11:19 +02:00
parent 19abc83312
commit 7eb791fe00
1 changed files with 5 additions and 0 deletions

View File

@ -31,6 +31,11 @@ IFeval(IFparseTree * tree, double gmin, double *result, double *vals,
int i, err; int i, err;
INPparseTree *myTree = (INPparseTree *) tree; INPparseTree *myTree = (INPparseTree *) tree;
if (!myTree) {
fprintf(stderr, "\nInternal error: No tree to evaluate.\n");
controlled_exit(EXIT_BAD);
}
#ifdef TRACE #ifdef TRACE
INPptPrint("calling PTeval, tree = ", tree); INPptPrint("calling PTeval, tree = ", tree);
printf("values:"); printf("values:");