git.oblomov.eu Git - wine/blob - programs/winetest/include/glu32.pm

   1 package glu32;
   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     "gluBeginCurve" => ["long",  ["ptr"]],
  16     "gluBeginPolygon" => ["long",  ["ptr"]],
  17     "gluBeginSurface" => ["long",  ["ptr"]],
  18     "gluBeginTrim" => ["long",  ["ptr"]],
  19     "gluBuild1DMipmaps" => ["long",  ["long", "long", "long", "long", "long", "ptr"]],
  20     "gluBuild2DMipmaps" => ["long",  ["long", "long", "long", "long", "long", "long", "ptr"]],
  21     "gluCheckExtension" => ["long",  ["ptr", "ptr"]],
  22     "gluCylinder" => ["long",  ["ptr", "double", "double", "double", "long", "long"]],
  23     "gluDeleteNurbsRenderer" => ["long",  ["ptr"]],
  24     "gluDeleteQuadric" => ["long",  ["ptr"]],
  25     "gluDeleteTess" => ["long",  ["ptr"]],
  26     "gluDisk" => ["long",  ["ptr", "double", "double", "long", "long"]],
  27     "gluEndCurve" => ["long",  ["ptr"]],
  28     "gluEndPolygon" => ["long",  ["ptr"]],
  29     "gluEndSurface" => ["long",  ["ptr"]],
  30     "gluEndTrim" => ["long",  ["ptr"]],
  31     "gluErrorString" => ["long",  ["long"]],
  32     "gluGetNurbsProperty" => ["long",  ["ptr", "long", "ptr"]],
  33     "gluGetString" => ["long",  ["long"]],
  34     "gluLoadSamplingMatrices" => ["long",  ["ptr", "ptr", "ptr", "ptr"]],
  35     "gluLookAt" => ["long",  ["double", "double", "double", "double", "double", "double", "double", "double", "double"]],
  36     "gluNewNurbsRenderer" => ["long",  ["undef"]],
  37     "gluNewQuadric" => ["long",  ["undef"]],
  38     "gluNewTess" => ["long",  ["undef"]],
  39     "gluNextContour" => ["long",  ["ptr", "long"]],
  40     "gluNurbsCallback" => ["long",  ["ptr", "long", "ptr"]],
  41     "gluNurbsCurve" => ["long",  ["ptr", "long", "ptr", "long", "ptr", "long", "long"]],
  42     "gluNurbsProperty" => ["long",  ["ptr", "long", "long"]],
  43     "gluNurbsSurface" => ["long",  ["ptr", "long", "ptr", "long", "ptr", "long", "long", "ptr", "long", "long", "long"]],
  44     "gluOrtho2D" => ["long",  ["double", "double", "double", "double"]],
  45     "gluPartialDisk" => ["long",  ["ptr", "double", "double", "long", "long", "double", "double"]],
  46     "gluPerspective" => ["long",  ["double", "double", "double", "double"]],
  47     "gluPickMatrix" => ["long",  ["double", "double", "double", "double", "ptr"]],
  48     "gluProject" => ["long",  ["double", "double", "double", "ptr", "ptr", "ptr", "ptr", "ptr", "ptr"]],
  49     "gluPwlCurve" => ["long",  ["ptr", "long", "ptr", "long", "long"]],
  50     "gluQuadricCallback" => ["long",  ["ptr", "long", "ptr"]],
  51     "gluQuadricDrawStyle" => ["long",  ["ptr", "long"]],
  52     "gluQuadricNormals" => ["long",  ["ptr", "long"]],
  53     "gluQuadricOrientation" => ["long",  ["ptr", "long"]],
  54     "gluQuadricTexture" => ["long",  ["ptr", "long"]],
  55     "gluScaleImage" => ["long",  ["long", "long", "long", "long", "ptr", "long", "long", "long", "ptr"]],
  56     "gluSphere" => ["long",  ["ptr", "double", "long", "long"]],
  57     "gluTessCallback" => ["long",  ["ptr", "long", "ptr"]],
  58     "gluTessVertex" => ["long",  ["ptr", "ptr", "ptr"]],
  59     "gluUnProject" => ["long",  ["double", "double", "double", "ptr", "ptr", "ptr", "ptr", "ptr", "ptr"]]
  60 };
  61
  62 &wine::declare("glu32",%$module_declarations);
  63 push @EXPORT, map { "&" . $_; } sort(keys(%$module_declarations));
  64 1;