Added missing cleanObject() call

src/pebblisp.c

@@ -163,6 +163,7 @@ Object listEvalFunc(
                 func_result, errorObject(ONLY_ONE_ARGUMENT), env);
         // Return a partial function if more parameters are required
         // Otherwise, return the function result
+        cleanObject(&rest[0]);
         return isError(func_result, ONLY_ONE_ARGUMENT) ?
             cloneObject(*list) :
             func_result;