Fix to issue #1385: offputting warnings in the sandbox.

stack/maxima/utils.mac

@@ -299,7 +299,8 @@ all_ops(%_expr) := block([%_edge, %_next_edge, %_tmp, %_op, %_result],
   if safe_op(ex) = "(" and safe_op(first(args(ex))) = "%_E" then return(%_ce_rem(second(args(ex)))),
   /* Rather subtle order of evaluation issue. */
   ex2:args(ex),
-  ex2:map(%_ce_rem, ex2),
+  /* The use of the un-named function below is to avoid a warning in the sandbox. */
+  ex2:map(lambda([ex3],%_ce_rem(ex3)), ex2),
   substpart(op(ex), ex2, 0)
 )$
 /* We need to compile %_CE_rem so that it is available to lisp as a lisp function. */