swig/Examples/test-suite/char_constant.i
Marcelo Matus 51d327f8a0 fix bug #1435090
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@8858 626c5289-ae23-0410-ae9c-e8d60b6d4f22
2006-02-21 18:04:59 +00:00

20 lines
380 B
OpenEdge ABL

/* This interface file tests whether character constants are correctly
wrapped as procedures returning Scheme characters (rather than
Scheme strings).
*/
%module char_constant
#define CHAR_CONSTANT 'x'
#define STRING_CONSTANT "xyzzy"
#define ESC_CONST '\1'
#define NULL_CONST '\0'
#define SPECIALCHAR 'á'
%inline
{
const int ia = (int)'a';
const int ib = 'b';
}