03aefbc6e9
It is still a bit rough around some edges, particularly with regard to multi-threading and operator overloading, and there are some documentation bits missing, but it should be fine for basic use. The test-suite should build and run fine with the current versions of DMD, LDC and Tango (at least) on Linux x86_64 and Mac OS X 10.6. git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@12299 626c5289-ae23-0410-ae9c-e8d60b6d4f22
43 lines
1.2 KiB
D
43 lines
1.2 KiB
D
module member_pointer_runme;
|
|
|
|
import Float = tango.text.convert.Float;
|
|
import member_pointer.member_pointer;
|
|
import member_pointer.Square;
|
|
import member_pointer.SWIGTYPE_m_Shape__f_void__double;
|
|
|
|
void main() {
|
|
auto s = new Square(10);
|
|
|
|
// Do some calculations
|
|
auto area_pt = areapt();
|
|
auto perim_pt = perimeterpt();
|
|
check("Square area ", 100.0, do_op(s, area_pt));
|
|
check("Square perim", 40.0, do_op(s, perim_pt));
|
|
|
|
SWIGTYPE_m_Shape__f_void__double memberPtr = null;
|
|
memberPtr = areavar;
|
|
memberPtr = perimetervar;
|
|
|
|
// Try the variables
|
|
check("Square area ", 100.0, do_op(s, areavar));
|
|
check("Square perim", 40.0, do_op(s, perimetervar));
|
|
|
|
// Modify one of the variables
|
|
areavar = perim_pt;
|
|
check("Square perimeter", 40.0, do_op(s,areavar));
|
|
|
|
// Try the constants
|
|
memberPtr = AREAPT;
|
|
memberPtr = PERIMPT;
|
|
memberPtr = NULLPT;
|
|
|
|
check("Square area", 100.0, do_op(s, AREAPT));
|
|
check("Square perim", 40.0, do_op(s, PERIMPT));
|
|
}
|
|
|
|
void check(char[] what, double expected, double actual) {
|
|
if (expected != actual) {
|
|
throw new Exception("Failed: " ~ what ~ ": expected "
|
|
~ Float.toString(expected) ~ ", but got " ~ Float.toString(actual));
|
|
}
|
|
}
|