diff options
| -rw-r--r-- | ChangeLog | 6 | ||||
| -rw-r--r-- | debug.c | 4 |
2 files changed, 8 insertions, 2 deletions
@@ -1,3 +1,9 @@ +2013-01-10 Kaz Kylheku <kaz@kylheku.com> + + * debug.c (help): Help text updated. + (debug): Fix conflicting command assignment. + Show form is now 'o'. + 2012-10-31 Kaz Kylheku <kaz@kylheku.com> * lib.c (int_str): Fix gaping bug introduced by previous commit, @@ -58,7 +58,7 @@ static void help(val stream) "? - help s - step into form\n" "h - help n - step over form\n" "c - continue f - finish form\n" - "v - show variable binding environment s - show current form\n" + "v - show variable binding environment o - show current form\n" "b - set breakpoint by line number i - show current data\n" "d - delete breakpoint w - backtrace\n" "l - list breakpoints g - set loglevel\n"), @@ -169,7 +169,7 @@ val debug(val form, val bindings, val data, val line, val pos, val base) return nil; } else if (equal(command, lit("v"))) { show_bindings(bindings, std_debug); - } else if (equal(command, lit("s"))) { + } else if (equal(command, lit("o"))) { print_form = t; } else if (equal(command, lit("i"))) { print_data = t; |