+ /* backup context */
+ workspace_t *tmp = backup_ws (alloc_ws ());
+ restore_ws (programs[n]);
+ VERBOSE (DEBUG, fprintf (stdout, "2 arg[0]: %g\n", get_tab (argument, 1)));
+
+ /* set arguments */
+ argument = def (nbargs, args);
+ VERBOSE (DEBUG, fprintf (stdout, "3 arg[0]: %g\n", get_tab (argument, 1)));