Ubuntu 10.04 PPC版で判明した問題を修正
[YACASL2.git] / src / word.c
index cf841ce..1bbffdb 100644 (file)
@@ -1,18 +1,32 @@
+#include <stdio.h>
+#include <string.h>
+#include <assert.h>
+#include <stdlib.h>
+#include <ctype.h>
+
 #include "word.h"
+#include "cerr.h"
 
-/* wordのエラー定義 */
-CERR cerr_word[] = {
+/**
+ * wordのエラー定義
+ */
+static CERR cerr_word[] = {
     { 114, "not integer" },
     { 115, "not hex" },
     { 116, "out of hex range" },
 };
 
+/**
+ * wordのエラーをエラーリストに追加
+ */
 bool addcerrlist_word()
 {
     return addcerrlist(ARRAYSIZE(cerr_word), cerr_word);
 }
 
-/* 10進数の文字列をWORD値に変換 */
+/**
+ * 10進数の文字列をWORD値に変換
+ */
 WORD n2word(const char *str)
 {
     assert(isdigit(*str) || *str == '-');
@@ -25,14 +39,16 @@ WORD n2word(const char *str)
         setcerr(114, str);    /* not integer */
         return 0x0;
     }
-    /* nã\81\8c-32768ã\80\9c32767の範囲にないときは、その下位16ビットを格納 */
+    /* nã\81\8c-32768ã\81\8bã\82\8932767の範囲にないときは、その下位16ビットを格納 */
     if(n < -32768 || n > 32767) {
         n = n & 0xFFFF;
     }
     return (WORD)n;
 }
 
-/* 16進数の文字列をWORD値に変換 */
+/**
+ * 16進数の文字列をWORD値に変換
+ */
 WORD h2word(const char *str)
 {
     assert(*str == '#');
@@ -53,11 +69,15 @@ WORD h2word(const char *str)
     return word;
 }
 
-/* 10進数または16進数の文字列をWORD値に変換 */
+/**
+ * 10進数または16進数の文字列をWORD値に変換
+ */
 WORD nh2word(const char *str)
 {
-    addcerrlist_word();
+    assert(sizeof(WORD)*8 == 16); /* WORD型のサイズが16ビットであることを確認 */
+
     WORD word;
+
     if(!isdigit(*str) && *str != '-' && *str != '#') {
         setcerr(114, str);    /* not integer */
         return 0x0;
@@ -70,26 +90,31 @@ WORD nh2word(const char *str)
     return word;
 }
 
-/* WORD値を10進数の文字列に変換 */
+/**
+ * WORD値を10進数の文字列に変換
+ */
 char *word2n(WORD word)
 {
     enum {
         MAXLEN = 6,        /* WORD値を10進数で表したときの最大桁数 */
     };
-    char *p = malloc_chk(MAXLEN, "word2n.p"), *q = malloc_chk(MAXLEN, "word2n.q");
+    char *p = malloc_chk(MAXLEN, "word2n.p"), *digit = malloc_chk(MAXLEN, "word2n.digit");
     int i = 0, j;
 
     do{
         *(p + i++) = word % 10 + '0';
     } while((word /= 10) > 0);
     for(j = 0; j < i; j++) {
-        *(q + j) = *(p + (i - 1) - j);
+        *(digit + j) = *(p + (i - 1) - j);
     }
-    *(q + j + 1) = '\0';
-    return q;
+    *(digit + j + 1) = '\0';
+    free_chk(p, "word2n.p");
+    return digit;
 }
 
-/* WORD値を2進数の文字列に変換 */
+/**
+ * WORD値を2進数の文字列に変換
+ */
 char *word2bit(const WORD word)
 {
     enum {
@@ -98,7 +123,7 @@ char *word2bit(const WORD word)
     WORD mask = 0x8000;
     char *bit, *p;
 
-    p = bit = malloc_chk(MAXLEN + 1, "word2bit.bit");
+    bit = p = malloc_chk(MAXLEN + 1, "word2bit.bit");
     do {
         *p++ = (word & mask) ? '1' : '0';
     } while((mask >>= 1) > 0);
@@ -106,7 +131,9 @@ char *word2bit(const WORD word)
     return bit;
 }
 
-/* WORD値を解析して表示 */
+/**
+ * WORD値を解析して表示
+ */
 void print_dumpword(WORD word, bool logicalmode)
 {
     if(logicalmode == true) {