File: Module.xs

package info (click to toggle)
libgimp-perl 2.0.dfsg-5
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 2,112 kB
  • ctags: 462
  • sloc: perl: 10,026; sh: 207; ansic: 207; makefile: 70
file content (33 lines) | stat: -rw-r--r-- 592 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
 
#include "config.h"

/* FIXME */
/* sys/param.h is redefining these! */
#undef MIN
#undef MAX

/* dunno where this comes from */
#undef VOIDUSED

#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"
#define NEED_newCONSTSUB
#include "gppport.h"

#include <libgimp/gimpmodule.h>

#include "../perl-intl.h"

MODULE = Gimp::Module	PACKAGE = Gimp::Module

VERSIONCHECK: DISABLE
PROTOTYPES: ENABLE

BOOT:
{
   HV *stash = gv_stashpvn("Gimp::Module", 12, TRUE);
   
   newCONSTSUB(stash,"MODULE_OK",newSViv(GIMP_MODULE_OK));
   newCONSTSUB(stash,"MODULE_UNLOAD",newSViv(GIMP_MODULE_UNLOAD));
}