# HG changeset patch
# User ods15
# Date 1162022610 0
# Node ID ca9b4b42ebf9acb14a691d637b6a115063758b4f
# Parent  772ab2a1deaa72d3cb8442c8f0c534e821eb18b5
add missing 'e->value * '

diff -r 772ab2a1deaa -r ca9b4b42ebf9 eval.c
--- a/eval.c	Sat Oct 28 07:03:24 2006 +0000
+++ b/eval.c	Sat Oct 28 08:03:30 2006 +0000
@@ -175,7 +175,7 @@
                 case e_mul: return e->value * (d * d2);
                 case e_div: return e->value * (d / d2);
                 case e_add: return e->value * (d + d2);
-                case e_last:return d2;
+                case e_last:return e->value * d2;
                 case e_st : return e->value * (p->var[clip(d, 0, VARS-1)]= d2);
             }
         }