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

   1 package msvcrt;
   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     "\?\?8type_info\@\@QBEHABV0\@\@Z" => ["long",  ["ptr", "ptr"]],
  16     "\?\?9type_info\@\@QBEHABV0\@\@Z" => ["long",  ["ptr", "ptr"]],
  17     "\?name\@type_info\@\@QBEPBDXZ" => ["ptr",  ["ptr"]],
  18     "\?raw_name\@type_info\@\@QBEPBDXZ" => ["ptr",  ["ptr"]]
  19 };
  20
  21 &wine::declare("msvcrt",%$module_declarations);
  22 push @EXPORT, map { "&" . $_; } sort(keys(%$module_declarations));
  23 1;