微修正

[YACASL2.git] / src / word.c

diff --git a/src/word.c b/src/word.c
index 0e80452..294c4d4 100644 (file)
--- a/src/word.c
+++ b/src/word.c
@@ -74,8 +74,7 @@ char *word2n(WORD word)
 char *word2bit(const WORD word)
 {
     WORD mask = 0x8000;
-    char *bit, *p;
-    bit = malloc(16 + 1);
+    char *bit = malloc(16 + 1), *p;
     p = bit;
     do {
         *p++ = (word & mask) ? '1' : '0';
@@ -83,3 +82,23 @@ char *word2bit(const WORD word)
     *p = '\0';
     return bit;
 }
+
+/* WORD値を解析して表示 */
+void print_dumpword(WORD word, bool logicalmode)
+{
+    if(logicalmode == true) {
+        fprintf(stdout, "%6d", word);
+    } else {
+        fprintf(stdout, "%6d", (signed short)word);
+    }
+    fprintf(stdout, " = #%04X = %s", word, word2bit(word));
+    /* 「文字の組」の符号表に記載された文字と、改行（CR）／タブを表示 */
+    if(word >= 0x20 && word <= 0x7E) {
+        fprintf(stdout, " = \'%c\'", word);
+    } else if(word == 0xA) {
+        fprintf(stdout, " = \'\\n\'");
+    } else if(word == '\t') {
+        fprintf(stdout, " = \'\\t\'");
+    }
+    fprintf(stdout, "\n");
+}