[Swig-user] Swig Perl Example.

[Gregory S. <bla...@gm...>]

Hi All,

I've recently come across Swig and am attempting to get the perl example up
and running however my gcc process seems to go awry.


Pertinent Information :

OS : 10.5.8

swig : SWIG Version 1.3.31

gcc : i686-apple-darwin9-gcc-4.0.1 (GCC) 4.0.1 (Apple Inc. build 5493)

perl : This is perl, v5.10.1 (*) built for darwin-2level



I'm following the perl example located here :

http://www.swig.org/Doc1.1/HTML/Introduction.html#n5


swig -perl5 ./example.i
[1534][blackberryoctopus:~/Documents/Code/Examples & Tests/C/Swig]$ ls
example.c      example.i      example.pm     example_wrap.c


gcc -c example.c example_wrap.c -I /usr/local/lib/perl5/5.10.1/ -I
/usr/local/lib/perl5/5.10.1/darwin-2level/CORE/example_wrap.c: In function
‘_wrap_My_variable_set’:
example_wrap.c:1619: error: ‘My_variable’ undeclared (first use in this
function)
example_wrap.c:1619: error: (Each undeclared identifier is reported only
once
example_wrap.c:1619: error: for each function it appears in.)
example_wrap.c: In function ‘_wrap_My_variable_get’:
example_wrap.c:1628: error: ‘My_variable’ undeclared (first use in this
function)



FILES

*example.c* :

                                            /* File : example.c */


double  My_variable  = 3.0;

/* Compute factorial of n */
int  fact(int n) {
if (n <= 1) return 1;
else return n*fact(n-1);
}

/* Compute n mod m */
int my_mod(int n, int m) {
return(n % m);
}



*example.i* :

/* File : example.i */
%module example
%{
/* Put headers and other declarations here */
%}

extern double My_variable;
extern int    fact(int);
extern int    my_mod(int n, int m);




Any help or insight would be greatly appreciated. I've read the docs and
search for the error I'm receiving to no avail, hopefully someone on the
list can help.


Thanks,
Gregory