Added regedit unit test, a couple minor changes to regedit.
[wine] / programs / winetest / include / avifil32.pm
1 package avifil32;
2
3 use strict;
4
5 require Exporter;
6
7 use wine;
8 use vars qw(@ISA @EXPORT @EXPORT_OK);
9
10 @ISA = qw(Exporter);
11 @EXPORT = qw();
12 @EXPORT_OK = qw();
13
14 my $module_declarations = {
15     "AVIFileAddRef" => ["long",  ["ptr"]],
16     "AVIFileCreateStreamA" => ["long",  ["ptr", "ptr", "ptr"]],
17     "AVIFileCreateStreamW" => ["long",  ["ptr", "ptr", "ptr"]],
18     "AVIFileEndRecord" => ["long",  ["ptr"]],
19     "AVIFileExit" => ["void",  []],
20     "AVIFileGetStream" => ["long",  ["ptr", "ptr", "long", "long"]],
21     "AVIFileInfo" => ["long",  ["ptr", "ptr", "long"]],
22     "AVIFileInfoA" => ["long",  ["ptr", "ptr", "long"]],
23     "AVIFileInfoW" => ["long",  ["ptr", "ptr", "long"]],
24     "AVIFileInit" => ["void",  []],
25     "AVIFileOpenA" => ["long",  ["ptr", "str", "long", "ptr"]],
26     "AVIFileOpenW" => ["long",  ["ptr", "wstr", "long", "ptr"]],
27     "AVIFileReadData" => ["long",  ["ptr", "long", "ptr", "ptr"]],
28     "AVIFileRelease" => ["long",  ["ptr"]],
29     "AVIFileWriteData" => ["long",  ["ptr", "long", "ptr", "long"]],
30     "AVIMakeCompressedStream" => ["long",  ["ptr", "ptr", "ptr", "ptr"]],
31     "AVIStreamAddRef" => ["long",  ["ptr"]],
32     "AVIStreamBeginStreaming" => ["long",  ["ptr", "long", "long", "long"]],
33     "AVIStreamCreate" => ["long",  ["ptr", "long", "long", "ptr"]],
34     "AVIStreamEndStreaming" => ["long",  ["ptr"]],
35     "AVIStreamFindSample" => ["long",  ["ptr", "long", "long"]],
36     "AVIStreamGetFrame" => ["ptr",  ["ptr", "long"]],
37     "AVIStreamGetFrameClose" => ["long",  ["ptr"]],
38     "AVIStreamGetFrameOpen" => ["ptr",  ["ptr", "ptr"]],
39     "AVIStreamInfo" => ["long",  ["ptr", "ptr", "long"]],
40     "AVIStreamInfoA" => ["long",  ["ptr", "ptr", "long"]],
41     "AVIStreamInfoW" => ["long",  ["ptr", "ptr", "long"]],
42     "AVIStreamLength" => ["long",  ["ptr"]],
43     "AVIStreamOpenFromFileA" => ["long",  ["ptr", "str", "long", "long", "long", "ptr"]],
44     "AVIStreamOpenFromFileW" => ["long",  ["ptr", "wstr", "long", "long", "long", "ptr"]],
45     "AVIStreamRead" => ["long",  ["ptr", "long", "long", "ptr", "long", "ptr", "ptr"]],
46     "AVIStreamReadData" => ["long",  ["ptr", "long", "ptr", "ptr"]],
47     "AVIStreamReadFormat" => ["long",  ["ptr", "long", "ptr", "ptr"]],
48     "AVIStreamRelease" => ["long",  ["ptr"]],
49     "AVIStreamSampleToTime" => ["long",  ["ptr", "long"]],
50     "AVIStreamSetFormat" => ["long",  ["ptr", "long", "ptr", "long"]],
51     "AVIStreamStart" => ["long",  ["ptr"]],
52     "AVIStreamTimeToSample" => ["long",  ["ptr", "long"]],
53     "AVIStreamWrite" => ["long",  ["ptr", "long", "long", "ptr", "long", "long", "ptr", "ptr"]],
54     "AVIStreamWriteData" => ["long",  ["ptr", "long", "ptr", "long"]],
55     "DllCanUnloadNow" => ["long",  []],
56     "DllGetClassObject" => ["long",  ["ptr", "ptr", "ptr"]]
57 };
58
59 &wine::declare("avifil32",%$module_declarations);
60 push @EXPORT, map { "&" . $_; } sort(keys(%$module_declarations));
61 1;