New example
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@727 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
887d79cae3
commit
12999f703a
5 changed files with 255 additions and 0 deletions
31
Examples/tcl/variables/example.i
Normal file
31
Examples/tcl/variables/example.i
Normal file
|
|
@ -0,0 +1,31 @@
|
|||
/* File : example.i */
|
||||
%module example
|
||||
|
||||
/* Some global variable declarations */
|
||||
extern int ivar;
|
||||
extern short svar;
|
||||
extern long lvar;
|
||||
extern unsigned int uivar;
|
||||
extern unsigned short usvar;
|
||||
extern unsigned long ulvar;
|
||||
extern signed char scvar;
|
||||
extern unsigned char ucvar;
|
||||
extern char cvar;
|
||||
extern float fvar;
|
||||
extern double dvar;
|
||||
extern char *strvar;
|
||||
extern int *iptrvar;
|
||||
extern char name[256];
|
||||
|
||||
/* Some helper functions to make it easier to test */
|
||||
extern void print_vars();
|
||||
extern int *new_int(int value);
|
||||
|
||||
/* A read-only variable */
|
||||
|
||||
%readonly
|
||||
extern int status;
|
||||
%readwrite
|
||||
|
||||
|
||||
|
||||
Loading…
Add table
Add a link
Reference in a new issue