Added regedit unit test, a couple minor changes to regedit.
[wine] / programs / winetest / include / rasapi32.pm
1 package rasapi32;
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     "RasDeleteEntryA" => ["long",  ["str", "str"]],
16     "RasDeleteEntryW" => ["long",  ["wstr", "wstr"]],
17     "RasEnumAutodialAddressesA" => ["long",  ["ptr", "ptr", "ptr"]],
18     "RasEnumAutodialAddressesW" => ["long",  ["ptr", "ptr", "ptr"]],
19     "RasEnumDevicesA" => ["long",  ["ptr", "ptr", "ptr"]],
20     "RasEnumDevicesW" => ["long",  ["ptr", "ptr", "ptr"]],
21     "RasGetAutodialAddressA" => ["long",  ["str", "ptr", "ptr", "ptr", "ptr"]],
22     "RasGetAutodialAddressW" => ["long",  ["wstr", "ptr", "ptr", "ptr", "ptr"]],
23     "RasGetAutodialEnableA" => ["long",  ["long", "ptr"]],
24     "RasGetAutodialEnableW" => ["long",  ["long", "ptr"]],
25     "RasGetAutodialParamA" => ["long",  ["long", "ptr", "ptr"]],
26     "RasGetAutodialParamW" => ["long",  ["long", "ptr", "ptr"]],
27     "RasSetAutodialAddressA" => ["long",  ["str", "long", "ptr", "long", "long"]],
28     "RasSetAutodialAddressW" => ["long",  ["wstr", "long", "ptr", "long", "long"]],
29     "RasSetAutodialEnableA" => ["long",  ["long", "long"]],
30     "RasSetAutodialEnableW" => ["long",  ["long", "long"]],
31     "RasSetAutodialParamA" => ["long",  ["long", "ptr", "long"]],
32     "RasSetAutodialParamW" => ["long",  ["long", "ptr", "long"]],
33     "RasEnumConnectionsA" => ["long",  ["ptr", "ptr", "ptr"]],
34     "RasEnumEntriesA" => ["long",  ["str", "str", "ptr", "ptr", "ptr"]],
35     "RasGetEntryDialParamsA" => ["long",  ["str", "ptr", "ptr"]],
36     "RasHangUpA" => ["long",  ["long"]]
37 };
38
39 &wine::declare("rasapi32",%$module_declarations);
40 push @EXPORT, map { "&" . $_; } sort(keys(%$module_declarations));
41 1;