mirror of https://github.com/swig/swig
66 lines
825 B
OpenEdge ABL
66 lines
825 B
OpenEdge ABL
%module li_std_stream
|
|
|
|
%{
|
|
#if defined(__SUNPRO_CC)
|
|
#pragma error_messages (off, badargtype2w) /* Formal argument ... is being passed extern "C" ... */
|
|
#endif
|
|
%}
|
|
|
|
%inline %{
|
|
struct A;
|
|
%}
|
|
|
|
%include <std_iostream.i>
|
|
%include <std_sstream.i>
|
|
|
|
|
|
|
|
%callback(1) A::bar;
|
|
|
|
%inline %{
|
|
|
|
struct B {
|
|
virtual ~B()
|
|
{
|
|
}
|
|
|
|
};
|
|
|
|
struct A : B
|
|
{
|
|
void __add__(int a)
|
|
{
|
|
}
|
|
|
|
void __add__(double a)
|
|
{
|
|
}
|
|
|
|
static int bar(int a){
|
|
return a;
|
|
}
|
|
|
|
static int foo(int a, int (*pf)(int a))
|
|
{
|
|
return pf(a);
|
|
}
|
|
|
|
|
|
std::ostream& __rlshift__(std::ostream& out)
|
|
{
|
|
out << "A class";
|
|
return out;
|
|
}
|
|
};
|
|
%}
|
|
|
|
%extend std::basic_ostream<char>{
|
|
std::basic_ostream<char>&
|
|
operator<<(const A& a)
|
|
{
|
|
*self << "A class";
|
|
return *self;
|
|
}
|
|
}
|
|
|