annotate win32/lzexpand.d @ 1:4a9dcbd9e54f

-files of 0.13 beta -fixes so that it now compiles with the current dmd version
author marton@basel.hu
date Tue, 05 Apr 2011 20:44:01 +0200
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
1 /***********************************************************************\
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
2 * lzexpand.d *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
3 * *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
4 * Windows API header module *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
5 * *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
6 * Translated from MinGW Windows headers *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
7 * *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
8 * Placed into public domain *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
9 \***********************************************************************/
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
10 module win32.lzexpand;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
11 pragma(lib, "lz32.lib");
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
12
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
13 private import win32.winbase, win32.windef;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
14
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
15 enum : LONG {
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
16 LZERROR_BADINHANDLE = -1,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
17 LZERROR_BADOUTHANDLE = -2,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
18 LZERROR_READ = -3,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
19 LZERROR_WRITE = -4,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
20 LZERROR_GLOBALLOC = -5,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
21 LZERROR_GLOBLOCK = -6,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
22 LZERROR_BADVALUE = -7,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
23 LZERROR_UNKNOWNALG = -8
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
24 }
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
25
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
26 extern (Windows):
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
27 deprecated {
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
28 LONG CopyLZFile(INT, INT);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
29 void LZDone();
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
30 INT LZStart();
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
31 }
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
32 INT GetExpandedNameA(LPSTR, LPSTR);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
33 INT GetExpandedNameW(LPWSTR, LPWSTR);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
34 void LZClose(INT);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
35 LONG LZCopy(INT, INT);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
36 INT LZInit(INT);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
37 INT LZOpenFileA(LPSTR, LPOFSTRUCT, WORD);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
38 INT LZOpenFileW(LPWSTR, LPOFSTRUCT, WORD);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
39 INT LZRead(INT, LPSTR, INT);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
40 LONG LZSeek(INT, LONG, INT);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
41
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
42 version (Unicode) {
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
43 alias GetExpandedNameW GetExpandedName;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
44 alias LZOpenFileW LZOpenFile;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
45 } else {
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
46 alias GetExpandedNameA GetExpandedName;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
47 alias LZOpenFileA LZOpenFile;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
48 }