shithub: mc

Download patch

ref: d0655ce4b8538de8a15f669eef1e71898061c811
parent: 150d005837997f450cbf84740d74daac485c2686
author: Ori Bernstein <[email protected]>
date: Sat May 12 15:02:18 EDT 2012 

Load return values properly.


--- a/8/reduce.c
+++ b/8/reduce.c
@@ -290,6 +290,7 @@
             t = mkexpr(-1, Ostor, r, v, NULL);
             lappend(&s->incqueue, &s->nqueue, t); 
             break;
+        case Olit:
         case Ovar:
             r = n;
             break;
@@ -351,7 +352,8 @@
             break;
         case Nexpr:
             r = rval(s, n);
-            append(s, r);
+            if (r)
+                append(s, r);
             break;
         case Nlit:
             r = n;