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

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        ext/stc/STC.xs
   3 // Purpose:     XS for Wx::STC
   4 // Author:      Mattia Barbon
   5 // Modified by:
   6 // Created:     23/05/2002
   7 // RCS-ID:      $Id: STC.xs 2700 2009-12-13 11:25:50Z mbarbon $
   8 // Copyright:   (c) 2002-2004, 2006-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
  17 #undef THIS
  18
  19 MODULE=Wx__STC
  20
  21 BOOT:
  22   INIT_PLI_HELPERS( wx_pli_helpers );
  23
  24 INCLUDE: perl -MExtUtils::XSpp::Cmd -e xspp -- -t ../../typemap.xsp XS/StyledTextCtrl.xs |
  25
  26 INCLUDE: perl -MExtUtils::XSpp::Cmd -e xspp -- -t ../../typemap.xsp XS/StyledTextEvent.xsp |
  27
  28 #include "cpp/st_constants.cpp"
  29
  30 #  //FIXME//tricky
  31 #if defined(__WXMSW__)
  32 #undef XS
  33 #define XS( name ) WXXS( name )
  34 #endif
  35
  36 MODULE=Wx__STC