X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fmonitor.c;h=93a9a727911454339a155e135a1a12b46b8acb8f;hb=b8f63d9b4e978bec3bfc1f4fc471e5ed946781fd;hp=bc3800eb71954c07deec7929bb6cc729136c72d5;hpb=62272dd0e7254b19a484fa1a2050ba15504d3ece;p=sbcl.git

diff --git a/src/runtime/monitor.c b/src/runtime/monitor.c
index bc3800e..93a9a72 100644
--- a/src/runtime/monitor.c
+++ b/src/runtime/monitor.c
@@ -236,7 +236,7 @@ static void search_cmd(char **ptr)
 
 static void call_cmd(char **ptr)
 {
-    lispobj thing = parse_lispobj(ptr), function, result, cons, args[3];
+    lispobj thing = parse_lispobj(ptr), function, result = 0, cons, args[3];
     int numargs;
 
     if (LowtagOf(thing) == type_OtherPointer) {