mirror of https://github.com/swig/swig
26 lines
462 B
OpenEdge ABL
26 lines
462 B
OpenEdge ABL
%module argcargvtest
|
|
|
|
#if !defined(SWIGC) && !defined(SWIGOCAML)
|
|
%include <argcargv.i>
|
|
|
|
%apply (int ARGC, char **ARGV) { (size_t argc, const char **argv) }
|
|
#endif
|
|
|
|
%inline %{
|
|
|
|
int mainc(size_t argc, const char **argv)
|
|
{
|
|
return (int)argc;
|
|
}
|
|
|
|
const char* mainv(size_t argc, const char **argv, int idx)
|
|
{
|
|
return argv[idx] ? argv[idx] : "<<NULL>>";
|
|
}
|
|
|
|
void initializeApp(size_t argc, const char **argv, bool setPGid = true, bool isMakeline = false)
|
|
{
|
|
}
|
|
|
|
%}
|