git.oblomov.eu Git - wine/blob - 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     "AVIFileCreateStreamA" => ["long",  ["ptr", "ptr", "ptr"]],
  16     "AVIFileCreateStreamW" => ["long",  ["ptr", "ptr", "ptr"]],
  17     "AVIFileExit" => ["void",  []],
  18     "AVIFileGetStream" => ["long",  ["ptr", "ptr", "long", "long"]],
  19     "AVIFileInfoA" => ["long",  ["ptr", "ptr", "long"]],
  20     "AVIFileInfoW" => ["long",  ["ptr", "ptr", "long"]],
  21     "AVIFileInit" => ["void",  []],
  22     "AVIFileOpenA" => ["long",  ["ptr", "str", "long", "ptr"]],
  23     "AVIFileRelease" => ["long",  ["ptr"]],
  24     "AVIMakeCompressedStream" => ["long",  ["ptr", "ptr", "ptr", "ptr"]],
  25     "AVIStreamGetFrame" => ["ptr",  ["ptr", "long"]],
  26     "AVIStreamGetFrameClose" => ["long",  ["ptr"]],
  27     "AVIStreamGetFrameOpen" => ["ptr",  ["ptr", "ptr"]],
  28     "AVIStreamInfoA" => ["long",  ["ptr", "ptr", "long"]],
  29     "AVIStreamInfoW" => ["long",  ["ptr", "ptr", "long"]],
  30     "AVIStreamLength" => ["long",  ["ptr"]],
  31     "AVIStreamRead" => ["long",  ["ptr", "long", "long", "ptr", "long", "ptr", "ptr"]],
  32     "AVIStreamReadData" => ["long",  ["ptr", "long", "ptr", "ptr"]],
  33     "AVIStreamReadFormat" => ["long",  ["ptr", "long", "ptr", "ptr"]],
  34     "AVIStreamRelease" => ["long",  ["ptr"]],
  35     "AVIStreamSetFormat" => ["long",  ["ptr", "long", "ptr", "long"]],
  36     "AVIStreamStart" => ["long",  ["ptr"]],
  37     "AVIStreamWrite" => ["long",  ["ptr", "long", "long", "ptr", "long", "long", "ptr", "ptr"]],
  38     "AVIStreamWriteData" => ["long",  ["ptr", "long", "ptr", "long"]]
  39 };
  40
  41 &wine::declare("avifil32",%$module_declarations);
  42 push @EXPORT, map { "&" . $_; } sort(keys(%$module_declarations));
  43 1;