default script retval

git-svn-id: svn://svn.code.sf.net/p/actiongame/code/trunk/ac@1536 e016b1c5-ed68-44aa-a2f7-31cac88cffde
2007-12-30 13:50:51 +00:00
parent aaeb2da8a2
commit 754b3fa37b
1 changed files with 1 additions and 1 deletions
@@ -226,7 +226,7 @@ char *executeret(const char *p)                            // all evaluation hap
    const int MAXWORDS = 25;                    // limit, remove
    char *w[MAXWORDS];
    char *retval = NULL;
-    #define setretval(v) { char *rv = v; if(rv) retval = rv; commandret = NULL; }
+    #define setretval(v) { char *rv = v; if(rv) retval = rv; else retval = newstring("0"); commandret = NULL; }
    for(bool cont = true; cont;)                // for each ; seperated statement
    {
        int numargs = MAXWORDS;