From: Matt Birkholz <matt@birchwood-abbey.net>
Date: Tue, 19 Sep 2017 23:56:37 +0000 (-0700)
Subject: microcode/debug.c: Avoid compiler warning; init in default case.
X-Git-Tag: mit-scheme-pucked-9.2.12~55
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=5adeef60a253ed0f56462b87e2dd459866b0bda3;p=mit-scheme.git

microcode/debug.c: Avoid compiler warning; init in default case.
---

diff --git a/src/microcode/debug.c b/src/microcode/debug.c
index 26fe18fce..99467c64e 100644
--- a/src/microcode/debug.c
+++ b/src/microcode/debug.c
@@ -284,6 +284,8 @@ print_ustring (outf_channel stream, SCHEME_OBJECT string)
 	cp |= (*next++ << 8);
 	cp |= (*next++ << 16);
 	break;
+      default:
+	cp = 0;
       }
       print_char (stream, cp);
     }