From 083a8413b5e43b831eaf739ea7bee01635826ea7 Mon Sep 17 00:00:00 2001
From: Andrew Johnson <anj@aps.anl.gov>
Date: Thu, 3 May 2007 20:37:41 +0000
Subject: [PATCH] Ensure result of previous rule calc evaluation is available
 for VAL.

---
 src/as/asLibRoutines.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/as/asLibRoutines.c b/src/as/asLibRoutines.c
index 2fd39802d..e2297663f 100644
--- a/src/as/asLibRoutines.c
+++ b/src/as/asLibRoutines.c
@@ -909,7 +909,7 @@ static long asComputeAsgPvt(ASG *pasg)
     if(!asActive) return(S_asLib_asNotActive);
     pasgrule = (ASGRULE *)ellFirst(&pasg->ruleList);
     while(pasgrule) {
-	double	result;
+	double	result = pasgrule->result;  /* set for VAL */
 	long	status;
 
 	if(pasgrule->calc && (pasg->inpChanged & pasgrule->inpUsed)) {