Problem: Can't use remote eval to inspect vars in debug mode.
Solution: Don't discard the call stack in debug mode. (closes #2237, #2247)
redir_off = TRUE; /* don't redirect debug commands */
State = NORMAL;
+ debug_mode = TRUE;
if (!debug_did_msg)
MSG(_("Entering Debug mode. Type \"cont\" to continue."));
msg_scroll = save_msg_scroll;
lines_left = Rows - 1;
State = save_State;
+ debug_mode = FALSE;
did_emsg = save_did_emsg;
cmd_silent = save_cmd_silent;
msg_silent = save_msg_silent;
* "Visual_mode" When State is NORMAL or INSERT.
* "finish_op" When State is NORMAL, after typing the operator and before
* typing the motion command.
+ * "debug_mode" Debug mode.
*/
EXTERN int State INIT(= NORMAL); /* This is the current state of the
* command interpreter. */
+#ifdef FEAT_EVAL
+EXTERN int debug_mode INIT(= FALSE);
+#endif
EXTERN int finish_op INIT(= FALSE);/* TRUE while an operator is pending */
EXTERN long opcount INIT(= 0); /* count for pending operator */
char_u *res;
int save_dbl = debug_break_level;
int save_ro = redir_off;
- void *fc;
+ void *fc = NULL;
/* Evaluate the expression at the toplevel, don't use variables local to
- * the calling function. */
- fc = clear_current_funccal();
+ * the calling function. Except when in debug mode. */
+ if (!debug_mode)
+ fc = clear_current_funccal();
/* Disable debugging, otherwise Vim hangs, waiting for "cont" to be
* typed. */
--emsg_silent;
if (emsg_silent < 0)
emsg_silent = 0;
- restore_current_funccal(fc);
+ if (fc != NULL)
+ restore_current_funccal(fc);
/* A client can tell us to redraw, but not to display the cursor, so do
* that here. */
static int included_patches[] =
{ /* Add new patch number below this line */
+/**/
+ 1217,
/**/
1216,
/**/