[ro-oslib-commits] OSLib/!OsLib/Source/User/oslib Zipper.swi,1.1,1.2

[<th...@us...>]

Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv24530

Modified Files:
	Zipper.swi 
Log Message:
Added some missing type and constant definitions.


Index: Zipper.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib/Zipper.swi,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Zipper.swi	22 Sep 2002 13:49:40 -0000	1.1
--- Zipper.swi	28 Nov 2002 23:31:28 -0000	1.2
***************
*** 24,27 ****
--- 24,70 ----
     Zipper_NoDiscard = Zipper_OpenFlags: 0x80000000;
  
+ TYPE
+    Zipper_CompressionDetails = .Bits;
+ 
+ CONST
+    Zipper_CompressionMethod      = Zipper_CompressionDetails: 0xff,
+    Zipper_CompressionMethodShift = .Int: 0,
+    Zipper_CompressionLevel       = Zipper_CompressionDetails: 0xf00,
+    Zipper_CompressionLevelShift  = .Int: 8;
+ 
+ CONST
+    Zipper_CompressionMethodStore   = Zipper_CompressionDetails: 0,
+    Zipper_CompressionMethodDeflate = Zipper_CompressionDetails: 8;
+ 
+ CONST
+    Zipper_CompressionLevelMinimum = Zipper_CompressionDetails: 1,
+    Zipper_CompressionLevelMaximum = Zipper_CompressionDetails: 9;
+ 
+ TYPE
+    Zipper_TimeSpecifier =
+    .Union
+    (  .Struct
+       (  .Bits: load_addr,
+          .Bits: exec_addr,
+          FileSwitch_Attr: attr
+       ): riscos_tyle,
+       .Struct
+       (  .Int: centiseconds,
+          .Int: seconds,
+          .Int: minutes,
+          .Int: hours,
+          .Int: date,
+          .Int: month,
+          .Int: year
+       ): zip_style
+    );
+ 
+ TYPE
+    Zipper_FileAttributes =
+    .Struct
+    (  .Bits: internal,
+       .Bits: external
+    );
+ 
  SWI
     Zipper_UnZipOpen =