Fixes for Borland C compiler jk_new_structure
authorvranyj1
Thu, 01 Sep 2011 21:44:08 +0000
branchjk_new_structure
changeset 963 7181c835cc9d
parent 962 7e8426c32bd4
child 964 097cdede29f1
Fixes for Borland C compiler
src/JavaZipSupport.st
--- a/src/JavaZipSupport.st	Thu Sep 01 21:14:23 2011 +0000
+++ b/src/JavaZipSupport.st	Thu Sep 01 21:44:08 2011 +0000
@@ -242,12 +242,14 @@
 
 %{
 #define strm (__zStreamVal(__INST(z_stream)))
+        int code, consumed;
+        
 	strm->next_in = (Bytef *) (__ByteArrayInstPtr(in_buf)->ba_element + __intVal(in_off));
 	strm->next_out = (Bytef *) (__ByteArrayInstPtr(out_buf)->ba_element + __intVal(out_off));
 	strm->avail_in = __intVal(in_len);	
 	strm->avail_out = __intVal(out_len);
 
-	int code, consumed;
+	
 	code = inflate(strm, Z_PARTIAL_FLUSH);
 
 	switch (code) {