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 =
|