From: Rei FURUKAWA <rei_furukawa@users.sourceforge.jp>
Date: Sat, 7 Dec 2002 05:43:31 +0000 (+0000)
Subject: make perl でのコンパイルが通らなくなっていたのを修正
X-Git-Tag: nkf-202~3
X-Git-Url: http://git.sourceforge.jp/view?p=nkf%2Fnkf.git;a=commitdiff_plain;h=a111f36e72874d09b15c79fc880d4e73d636897e

make perl でのコンパイルが通らなくなっていたのを修正
---

diff --git a/nkf.c b/nkf.c
index b247ee2..d342f03 100644
--- a/nkf.c
+++ b/nkf.c
@@ -3328,13 +3328,12 @@ reinit()
     option_mode = 0;
     crmode_f = 0;
 
-    e_stat = 0;
-    s_stat = 0;
-#ifdef UTF8_INPUT_ENABLE
-    w_stat = 0;
-#else
-    w_stat = -1;
-#endif
+    {
+        struct input_code *p = input_code_list;
+        while (p->name){
+            status_reset(p++);
+        }
+    }
 #ifdef UTF8_OUTPUT_ENABLE
     if (w_oconv16_begin_f) {
 	w_oconv16_begin_f = 2;