File: Const.xs

package info (click to toggle)
libopengl-modern-perl 0.0401-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 5,592 kB
  • sloc: perl: 82,853; ansic: 47,600; makefile: 3
file content (16 lines) | stat: -rw-r--r-- 361 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
#define PERL_NO_GET_CONTEXT
#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

#include "ppport.h"

#include <GL/glew.h>

#define OGL_CONST_i(test) newCONSTSUB(stash, #test, newSViv((IV)test));

MODULE = OpenGL::Modern::Const		PACKAGE = OpenGL::Modern

BOOT:
  HV *stash = gv_stashpvn("OpenGL::Modern", strlen("OpenGL::Modern"), TRUE);
#include "const.h"