# HG changeset patch
# User ods15
# Date 1162019004 0
# Node ID 772ab2a1deaa72d3cb8442c8f0c534e821eb18b5
# Parent  3c00eb82db0d77f08395dd5b2cdd050e32b32d2a
shut gcc warning, also makes sense for NAN to be returned if the loop was never executed

diff -r 3c00eb82db0d -r 772ab2a1deaa eval.c
--- a/eval.c	Fri Oct 27 23:37:35 2006 +0000
+++ b/eval.c	Sat Oct 28 07:03:24 2006 +0000
@@ -156,7 +156,7 @@
         case e_gauss: { double d = eval_expr(p, e->param[0]); return exp(-d*d/2)/sqrt(2*M_PI); }
         case e_ld:     return e->value * p->var[clip(eval_expr(p, e->param[0]), 0, VARS-1)];
         case e_while: {
-            double d;
+            double d = NAN;
             while(eval_expr(p, e->param[0]))
                 d=eval_expr(p, e->param[1]);
             return d;