bug fix cvs_MAIN
authorClaus Gittinger <cg@exept.de>
Thu, 22 Aug 2019 00:49:44 +0200
branchcvs_MAIN
changeset 3938 4eeee7bc806e
parent 3937 18f67facc8dd
child 3939 59ea7239aee5
bug fix
JavaZipDeflater.st
--- a/JavaZipDeflater.st	Thu Aug 15 15:14:07 2019 +0200
+++ b/JavaZipDeflater.st	Thu Aug 22 00:49:44 2019 +0200
@@ -4,7 +4,7 @@
  New code and modifications done at SWING Research Group [1]:
 
  COPYRIGHT (c) 2010-2015 by Jan Vrany, Jan Kurs and Marcel Hlopko
-                            SWING Research Group, Czech Technical University in Prague
+			    SWING Research Group, Czech Technical University in Prague
 
  This software is furnished under a license and may be used
  only in accordance with the terms of that license and with the
@@ -55,7 +55,7 @@
  New code and modifications done at SWING Research Group [1]:
 
  COPYRIGHT (c) 2010-2015 by Jan Vrany, Jan Kurs and Marcel Hlopko
-                            SWING Research Group, Czech Technical University in Prague
+			    SWING Research Group, Czech Technical University in Prague
 
  This software is furnished under a license and may be used
  only in accordance with the terms of that license and with the
@@ -94,7 +94,7 @@
 adler
 
 %{
-        RETURN ( __MKEXTERNALADDRESS ( __zStreamVal(__INST(z_stream))->adler ) );
+	RETURN ( __MKEXTERNALADDRESS ( __zStreamVal(__INST(z_stream))->adler ) );
 %}
 
     "Modified: / 25-07-2014 / 00:47:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
@@ -164,7 +164,7 @@
 	code = deflateParams(strm, __intVal(level), __intVal(strategy));
 	switch (code) {
 	    case Z_OK:
-		setParams = __intVal(0);
+		setParams = __MKSMALLINT(0);
 		consumed = __intVal(in_len) - strm->avail_in;
 
 		in_off = __MKSMALLINT(__intVal(in_off) + consumed);
@@ -172,7 +172,7 @@
 		ret = __MKSMALLINT(__intVal(out_len) - strm->avail_out);
 		break;
 	    case Z_BUF_ERROR:
-		setParams = __intVal(0);
+		setParams = __MKSMALLINT(0);
 		ret = __MKSMALLINT(0);
 		break;
 	    default:
@@ -500,4 +500,3 @@
 
     ^ '$Changeset: <not expanded> $'
 ! !
-