git.maemo.org Git - pkg-perl/blob - deb-src/libwx-perl/libwx-perl-0.96/ext/xrc/XRC.xs

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        ext/xrc/XRC.xs
   3 // Purpose:     XS for wxWidgets XML Resources
   4 // Author:      Mattia Barbon
   5 // Modified by:
   6 // Created:     27/07/2001
   7 // RCS-ID:      $Id: XRC.xs 2700 2009-12-13 11:25:50Z mbarbon $
   8 // Copyright:   (c) 2001-2004, 2006, 2008-2009 Mattia Barbon
   9 // Licence:     This program is free software; you can redistribute it and/or
  10 //              modify it under the same terms as Perl itself
  11 /////////////////////////////////////////////////////////////////////////////
  12
  13 #define PERL_NO_GET_CONTEXT
  14
  15 #include "cpp/wxapi.h"
  16 #include "cpp/xr_constants.cpp"
  17
  18 #undef THIS
  19
  20 MODULE=Wx__XRC
  21
  22 BOOT:
  23   INIT_PLI_HELPERS( wx_pli_helpers );
  24
  25 INCLUDE: XS/XmlResource.xs
  26
  27 INCLUDE: perl -MExtUtils::XSpp::Cmd -e xspp -- -t ../../typemap.xsp XS/XmlSubclassFactory.xsp |
  28
  29 INCLUDE: perl -MExtUtils::XSpp::Cmd -e xspp -- -t ../../typemap.xsp XS/XmlDocument.xsp |
  30
  31 INCLUDE: perl -MExtUtils::XSpp::Cmd -e xspp -- -t ../../typemap.xsp XS/XmlNode.xsp |
  32
  33 INCLUDE: perl -MExtUtils::XSpp::Cmd -e xspp -- -t ../../typemap.xsp XS/XmlResourceHandler.xsp |
  34
  35 MODULE=Wx__XRC PACKAGE=Wx PREFIX=wx
  36
  37 void
  38 wxXmlInitXmlModule()
  39   CODE:
  40     // nothing here
  41
  42 void
  43 wxXmlInitResourceModule()
  44
  45 #include "cpp/overload.h"
  46 #include "cpp/ovl_const.cpp"
  47
  48 #  //FIXME//tricky
  49 #if defined(__WXMSW__)
  50 #undef XS
  51 #define XS( name ) WXXS( name )
  52 #endif
  53
  54 MODULE=Wx__XRC