File audacity-retval.patch of Package audacity

Index: lib-src/libnyquist/nyquist/xlisp/xlbfun.c
===================================================================
--- lib-src/libnyquist/nyquist/xlisp/xlbfun.c.orig
+++ lib-src/libnyquist/nyquist/xlisp/xlbfun.c
@@ -603,6 +603,7 @@ LVAL xcleanup(void)
 {
     xllastarg();
     xlcleanup();
+    return (NIL);
 }
 
 /* xtoplevel - special form 'top-level' */
@@ -610,6 +611,7 @@ LVAL xtoplevel(void)
 {
     xllastarg();
     xltoplevel();
+    return (NIL);
 }
 
 /* xcontinue - special form 'continue' */
@@ -617,6 +619,7 @@ LVAL xcontinue(void)
 {
     xllastarg();
     xlcontinue();
+    return (NIL);
 }
 
 /* xevalhook - eval hook function */
Index: lib-src/libnyquist/nyquist/xlisp/xlread.c
===================================================================
--- lib-src/libnyquist/nyquist/xlisp/xlread.c.orig
+++ lib-src/libnyquist/nyquist/xlisp/xlread.c
@@ -335,6 +335,8 @@ int readone(LVAL fptr, LVAL *pval)
     /* handle illegal characters */
     else
         xlerror("illegal character",cvfixnum((FIXTYPE)ch));
+
+    return (FALSE);
 }
 
 /* rmhash - read macro for '#' */
openSUSE Build Service is sponsored by