X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=src%2Fcerr.c;h=069564b46e002cddd29ccbc232d752baf74e0fb0;hp=36b33a4dce81b1db45ca5a34bf4867e431d16547;hb=de18494f8acd2f8ca87b86c54bfee1c2094c0d83;hpb=456e72090c786b40ac10ee984617afc054555f4d

diff --git a/src/cerr.c b/src/cerr.c
index 36b33a4..069564b 100644
--- a/src/cerr.c
+++ b/src/cerr.c
@@ -25,7 +25,7 @@ CERR *cerr;
 CERRLIST *cerrlist;
 
 /**
- * エラーリストを作成・追加する
+ * エラーリストを作成または追加する
  */
 bool addcerrlist(int newerrc, CERR newerrv[])
 {
@@ -51,6 +51,22 @@ bool addcerrlist(int newerrc, CERR newerrv[])
     return true;
 }
 
+/**
+ * エラーリストを表示する
+ */
+void printcerrlist()
+{
+    CERRLIST *p;
+
+    if(cerrlist == NULL) {
+        puts("error list is null.");
+    } else {
+        for(p = cerrlist; p != NULL; p = p->next) {
+            printf("%d: %s\n", p->cerr->num, p->cerr->msg);
+        }
+    }
+}
+
 /**
  * 現在のエラーを設定する
  */
@@ -96,7 +112,7 @@ void freecerr()
         p = q;
     }
     /* 現在のエラーメッセージを解放 */
-    free_chk(cerr->msg, "cerr.msg");
+    /* free_chk(cerr->msg, "cerr->msg"); */
     /* 現在のエラーを解放 */
     free_chk(cerr, "cerr");
 }