* In a realisation goal, check the result of the corresponding

normalisation goal.
This commit is contained in:
Eelco Dolstra 2004-06-28 13:51:24 +00:00
parent 24286e15c9
commit 4d2946c516
1 changed files with 6 additions and 0 deletions

View File

@ -1254,6 +1254,7 @@ void RealisationGoal::init()
trace("init");
if (querySuccessor(nePath, nfPath)) {
nrFailed = 0;
isNormalised();
return;
}
@ -1277,6 +1278,11 @@ void RealisationGoal::isNormalised()
{
trace("has been normalised");
if (nrFailed != 0) {
amDone(false);
return;
}
nfPath = queryNormalForm(nePath);
/* Now make sure that the store expression exists. If it doesn't,