8 use vars qw(@ISA @EXPORT @EXPORT_OK);
14 my $module_declarations = {
15 "MenuHelp" => ["void", ["long", "long", "long", "long", "long", "long", "ptr"]],
16 "ShowHideMenuCtl" => ["long", ["long", "long", "ptr"]],
17 "GetEffectiveClientRect" => ["void", ["long", "ptr", "ptr"]],
18 "DrawStatusTextA" => ["void", ["long", "ptr", "str", "long"]],
19 "CreateStatusWindowA" => ["long", ["long", "str", "long", "long"]],
20 "CreateToolbar" => ["long", ["long", "long", "long", "long", "long", "long", "ptr", "long"]],
21 "CreateMappedBitmap" => ["long", ["long", "long", "long", "ptr", "long"]],
22 "DPA_LoadStream" => ["long", ["ptr", "ptr", "ptr", "long"]],
23 "DPA_SaveStream" => ["long", ["long", "ptr", "ptr", "long"]],
24 "DPA_Merge" => ["long", ["long", "long", "long", "ptr", "ptr", "long"]],
25 "MakeDragList" => ["long", ["long"]],
26 "LBItemFromPt" => ["long", ["long", "long", "long", "long"]],
27 "DrawInsert" => ["void", ["long", "long", "long"]],
28 "CreateUpDownControl" => ["long", ["long", "long", "long", "long", "long", "long", "long", "long", "long", "long", "long", "long"]],
29 "InitCommonControls" => ["void", []],
30 "Alloc" => ["ptr", ["long"]],
31 "ReAlloc" => ["ptr", ["ptr", "long"]],
32 "Free" => ["long", ["ptr"]],
33 "GetSize" => ["long", ["ptr"]],
34 "CreateMRUListA" => ["long", ["ptr"]],
35 "FreeMRUList" => ["long", ["long"]],
36 "AddMRUStringA" => ["long", ["long", "str"]],
37 "EnumMRUListA" => ["long", ["long", "long", "ptr", "long"]],
38 "FindMRUStringA" => ["long", ["long", "str", "ptr"]],
39 "DelMRUString" => ["long", ["long", "long"]],
40 "CreateMRUListLazyA" => ["long", ["ptr", "long", "long", "long"]],
41 "AddMRUData" => ["long", ["long", "ptr", "long"]],
42 "FindMRUData" => ["long", ["long", "ptr", "long", "ptr"]],
43 "Str_GetPtrA" => ["long", ["str", "str", "long"]],
44 "Str_SetPtrA" => ["long", ["ptr", "str"]],
45 "Str_GetPtrW" => ["long", ["wstr", "wstr", "long"]],
46 "Str_SetPtrW" => ["long", ["ptr", "wstr"]],
47 "DSA_Create" => ["long", ["long", "long"]],
48 "DSA_Destroy" => ["long", ["long"]],
49 "DSA_GetItem" => ["long", ["long", "long", "ptr"]],
50 "DSA_GetItemPtr" => ["ptr", ["long", "long"]],
51 "DSA_InsertItem" => ["long", ["long", "long", "ptr"]],
52 "DSA_SetItem" => ["long", ["long", "long", "ptr"]],
53 "DSA_DeleteItem" => ["long", ["long", "long"]],
54 "DSA_DeleteAllItems" => ["long", ["long"]],
55 "DPA_Create" => ["long", ["long"]],
56 "DPA_Destroy" => ["long", ["long"]],
57 "DPA_Grow" => ["long", ["long", "long"]],
58 "DPA_Clone" => ["long", ["long", "long"]],
59 "DPA_GetPtr" => ["ptr", ["long", "long"]],
60 "DPA_GetPtrIndex" => ["long", ["long", "ptr"]],
61 "DPA_InsertPtr" => ["long", ["long", "long", "ptr"]],
62 "DPA_SetPtr" => ["long", ["long", "long", "ptr"]],
63 "DPA_DeletePtr" => ["ptr", ["long", "long"]],
64 "DPA_DeleteAllPtrs" => ["long", ["long"]],
65 "DPA_Sort" => ["long", ["long", "ptr", "long"]],
66 "DPA_Search" => ["long", ["long", "ptr", "long", "ptr", "long", "long"]],
67 "DPA_CreateEx" => ["long", ["long", "long"]],
68 "SendNotify" => ["long", ["long", "long", "long", "ptr"]],
69 "SendNotifyEx" => ["long", ["long", "long", "long", "ptr", "long"]],
70 "StrChrA" => ["str", ["str", "long"]],
71 "StrRChrA" => ["str", ["str", "str", "long"]],
72 "StrCmpNA" => ["long", ["str", "str", "long"]],
73 "StrCmpNIA" => ["long", ["str", "str", "long"]],
74 "StrStrA" => ["str", ["str", "str"]],
75 "StrStrIA" => ["str", ["str", "str"]],
76 "StrCSpnA" => ["long", ["str", "str"]],
77 "StrToIntA" => ["long", ["str"]],
78 "StrChrW" => ["wstr", ["wstr", "long"]],
79 "StrRChrW" => ["wstr", ["wstr", "wstr", "long"]],
80 "StrCmpNW" => ["long", ["wstr", "wstr", "long"]],
81 "StrCmpNIW" => ["long", ["wstr", "wstr", "long"]],
82 "StrStrW" => ["wstr", ["wstr", "wstr"]],
83 "StrSpnW" => ["long", ["wstr", "wstr"]],
84 "StrToIntW" => ["long", ["wstr"]],
85 "SmoothScrollWindow" => ["long", ["ptr"]],
86 "DPA_EnumCallback" => ["void", ["long", "ptr", "long"]],
87 "DPA_DestroyCallback" => ["long", ["long", "ptr", "long"]],
88 "DSA_EnumCallback" => ["void", ["long", "ptr", "long"]],
89 "DSA_DestroyCallback" => ["long", ["long", "ptr", "long"]],
90 "CreateMRUListW" => ["long", ["ptr"]],
91 "AddMRUStringW" => ["long", ["long", "wstr"]],
92 "FindMRUStringW" => ["long", ["long", "wstr", "ptr"]],
93 "EnumMRUListW" => ["long", ["long", "long", "ptr", "long"]],
94 "CreateMRUListLazyW" => ["long", ["ptr", "long", "long", "long"]],
95 "CreatePropertySheetPage" => ["long", ["ptr"]],
96 "CreatePropertySheetPageA" => ["long", ["ptr"]],
97 "CreatePropertySheetPageW" => ["long", ["ptr"]],
98 "CreateStatusWindow" => ["long", ["long", "str", "long", "long"]],
99 "CreateStatusWindowW" => ["long", ["long", "wstr", "long", "long"]],
100 "CreateToolbarEx" => ["long", ["long", "long", "long", "long", "long", "long", "ptr", "long", "long", "long", "long", "long", "long"]],
101 "DestroyPropertySheetPage" => ["long", ["long"]],
102 "DllGetVersion" => ["long", ["ptr"]],
103 "DllInstall" => ["long", ["long", "wstr"]],
104 "DrawStatusText" => ["void", ["long", "ptr", "str", "long"]],
105 "DrawStatusTextW" => ["void", ["long", "ptr", "wstr", "long"]],
106 "FlatSB_EnableScrollBar" => ["long", ["long", "long", "long"]],
107 "FlatSB_GetScrollInfo" => ["long", ["long", "long", "ptr"]],
108 "FlatSB_GetScrollPos" => ["long", ["long", "long"]],
109 "FlatSB_GetScrollProp" => ["long", ["long", "long", "ptr"]],
110 "FlatSB_GetScrollRange" => ["long", ["long", "long", "ptr", "ptr"]],
111 "FlatSB_SetScrollInfo" => ["long", ["long", "long", "ptr", "long"]],
112 "FlatSB_SetScrollPos" => ["long", ["long", "long", "long", "long"]],
113 "FlatSB_SetScrollProp" => ["long", ["long", "long", "long", "long"]],
114 "FlatSB_ShowScrollBar" => ["long", ["long", "long", "long"]],
115 "GetMUILanguage" => ["long", []],
116 "ImageList_Add" => ["long", ["long", "long", "long"]],
117 "ImageList_AddIcon" => ["long", ["long", "long"]],
118 "ImageList_AddMasked" => ["long", ["long", "long", "long"]],
119 "ImageList_BeginDrag" => ["long", ["long", "long", "long", "long"]],
120 "ImageList_Copy" => ["long", ["long", "long", "long", "long", "long"]],
121 "ImageList_Create" => ["long", ["long", "long", "long", "long", "long"]],
122 "ImageList_Destroy" => ["long", ["long"]],
123 "ImageList_DragEnter" => ["long", ["long", "long", "long"]],
124 "ImageList_DragLeave" => ["long", ["long"]],
125 "ImageList_DragMove" => ["long", ["long", "long"]],
126 "ImageList_DragShowNolock" => ["long", ["long"]],
127 "ImageList_Draw" => ["long", ["long", "long", "long", "long", "long", "long"]],
128 "ImageList_DrawEx" => ["long", ["long", "long", "long", "long", "long", "long", "long", "long", "long", "long"]],
129 "ImageList_DrawIndirect" => ["long", ["ptr"]],
130 "ImageList_Duplicate" => ["long", ["long"]],
131 "ImageList_EndDrag" => ["long", []],
132 "ImageList_GetBkColor" => ["long", ["long"]],
133 "ImageList_GetDragImage" => ["long", ["ptr", "ptr"]],
134 "ImageList_GetFlags" => ["long", ["long"]],
135 "ImageList_GetIcon" => ["long", ["long", "long", "long"]],
136 "ImageList_GetIconSize" => ["long", ["long", "ptr", "ptr"]],
137 "ImageList_GetImageCount" => ["long", ["long"]],
138 "ImageList_GetImageInfo" => ["long", ["long", "long", "ptr"]],
139 "ImageList_GetImageRect" => ["long", ["long", "long", "ptr"]],
140 "ImageList_LoadImage" => ["long", ["long", "str", "long", "long", "long", "long", "long"]],
141 "ImageList_LoadImageA" => ["long", ["long", "str", "long", "long", "long", "long", "long"]],
142 "ImageList_LoadImageW" => ["long", ["long", "wstr", "long", "long", "long", "long", "long"]],
143 "ImageList_Merge" => ["long", ["long", "long", "long", "long", "long", "long"]],
144 "ImageList_Read" => ["long", ["ptr"]],
145 "ImageList_Remove" => ["long", ["long", "long"]],
146 "ImageList_Replace" => ["long", ["long", "long", "long", "long"]],
147 "ImageList_ReplaceIcon" => ["long", ["long", "long", "long"]],
148 "ImageList_SetBkColor" => ["long", ["long", "long"]],
149 "ImageList_SetDragCursorImage" => ["long", ["long", "long", "long", "long"]],
150 "ImageList_SetFilter" => ["long", ["long", "long", "long"]],
151 "ImageList_SetFlags" => ["long", ["long", "long"]],
152 "ImageList_SetIconSize" => ["long", ["long", "long", "long"]],
153 "ImageList_SetImageCount" => ["long", ["long", "long"]],
154 "ImageList_SetOverlayImage" => ["long", ["long", "long", "long"]],
155 "ImageList_Write" => ["long", ["long", "ptr"]],
156 "InitCommonControlsEx" => ["long", ["ptr"]],
157 "InitMUILanguage" => ["void", ["long"]],
158 "InitializeFlatSB" => ["long", ["long"]],
159 "PropertySheet" => ["long", ["ptr"]],
160 "PropertySheetA" => ["long", ["ptr"]],
161 "PropertySheetW" => ["long", ["ptr"]],
162 "UninitializeFlatSB" => ["long", ["long"]],
163 "_TrackMouseEvent" => ["long", ["ptr"]]
166 &wine::declare("comctl32",%$module_declarations);
167 push @EXPORT, map { "&" . $_; } sort(keys(%$module_declarations));