c47c930f59
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@7321 626c5289-ae23-0410-ae9c-e8d60b6d4f22
19 lines
321 B
OpenEdge ABL
19 lines
321 B
OpenEdge ABL
/* File : example.i */
|
|
|
|
/* Basic C example for swig contract */
|
|
/* Tiger, University of Chicago, 2003 */
|
|
|
|
%module example
|
|
|
|
%contract Circle (int x, int y, int radius) {
|
|
require:
|
|
x >= 0;
|
|
y >= 0;
|
|
radius > x;
|
|
ensure:
|
|
Circle >= 0;
|
|
}
|
|
|
|
%inline %{
|
|
extern int Circle (int x, int y, int radius);
|
|
%}
|