git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@4662 626c5289-ae23-0410-ae9c-e8d60b6d4f22
36 lines
1.1 KiB
OpenEdge ABL
36 lines
1.1 KiB
OpenEdge ABL
|
|
// This testcase uses the %javaconst directive to control how enums are initialised
|
|
|
|
%module java_enums
|
|
|
|
// Some pragmas to add in an interface to the module class - checks that the java_enumsConstants interface class is also 'implemented'
|
|
%pragma(java) moduleinterfaces="Serializable"
|
|
%pragma(java) moduleimports=%{
|
|
import java.io.*; // For Serializable
|
|
%}
|
|
|
|
// Set default Java const code generation
|
|
%javaconst(1);
|
|
|
|
%inline %{
|
|
enum stuff { FIDDLE = 2*100, STICKS = 5+8, BONGO, DRUMS };
|
|
%}
|
|
|
|
// Check that the enum typemaps are working by using a short for the enums instead of int
|
|
%javaconst(0); // will create compile errors in runme file if short typemaps not used
|
|
%typemap(jtype) enum nonsense "short"
|
|
%typemap(jstype) enum nonsense "short"
|
|
%typemap(javain) enum nonsense "$javainput"
|
|
%typemap(in) enum nonsense %{ $1 = (short)$input; %}
|
|
%typemap(out) enum nonsense %{ $result = (jshort)$1; %}
|
|
%typemap(jni) enum nonsense "jshort"
|
|
%typemap(javaout) enum nonsense {
|
|
return $jnicall;
|
|
}
|
|
|
|
|
|
%inline %{
|
|
enum nonsense { POPPYCOCK, JUNK };
|
|
nonsense test1(nonsense n) { return n; }
|
|
enum nonsense test2(enum nonsense n) { return n; }
|
|
%}
|