summaryrefslogtreecommitdiffstats
path: root/debug.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2012-01-21 13:09:12 -0800
committerKaz Kylheku <kaz@kylheku.com>2012-01-21 13:09:12 -0800
commit0cbd46033d0ef707a856c78e735dbf41a6fd7faa (patch)
tree2635d7cb036609c494fcb6d6c72dc96b899cdd37 /debug.c
parentd4d41b4ec3f983ad0fa42f8e85a2c68d207a9b28 (diff)
downloadtxr-0cbd46033d0ef707a856c78e735dbf41a6fd7faa.tar.gz
txr-0cbd46033d0ef707a856c78e735dbf41a6fd7faa.tar.bz2
txr-0cbd46033d0ef707a856c78e735dbf41a6fd7faa.zip
* debug.c (last_command): Do not initialize with lit();
this is not a constant expression in C. (debug): Handle the situation here.
Diffstat (limited to 'debug.c')
-rw-r--r--debug.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/debug.c b/debug.c
index ce8109e4..bad1c1d5 100644
--- a/debug.c
+++ b/debug.c
@@ -20,7 +20,7 @@ val debug_block_s;
static int step_mode;
static int next_depth = -1;
val breakpoints;
-val last_command = lit("");
+val last_command;
static void help(val stream)
{
@@ -96,7 +96,7 @@ val debug(val form, val bindings, val data, val line, val chr)
input = split_str_set(or2(get_line(std_input), lit("q")), lit("\t "));
command = if3(equal(first(input), null_string),
- last_command, first(input));
+ or2(last_command, lit("")), first(input));
last_command = command;
if (equal(command, lit("?")) || equal(command, lit("h"))) {