Hi All,

I got my test to run (somewhat), thanks to all for your help.  I have a
c function in a static lib file which takes and int and a char **

int
Init(int, char **);

I have made a wrapper around it in my perl test in the __C__ section

int
PInit(int argc, char **argv) {
    return Init(argc, argv);
}

I have also put in that library the XS_unpack_CharPtrPtr;  The compile
works fine.  When It runs I always get the Usage message:

Usage  main::PInit(int argc, char ** argv)

Now Calling PInit:

$test = PInit($#ARGV, @ARGV);

Looking into the build directory I see where it is happening in the c
file:

if (item != 2) ...

I don't see where item gets set though.

    Any clues?

            Thanks

                    Glenn

--

Glenn MacGregor

Director of Services
Oracom, Inc.
http://www.oracom.com

Tel. +1 978.557.5710 Ext. 302
Fax  +1 978.557.5716



Reply via email to