diff options
Diffstat (limited to 'mcs/ilasm/tests/test-pinvoke-b.il')
-rw-r--r-- | mcs/ilasm/tests/test-pinvoke-b.il | 40 |
1 files changed, 40 insertions, 0 deletions
diff --git a/mcs/ilasm/tests/test-pinvoke-b.il b/mcs/ilasm/tests/test-pinvoke-b.il new file mode 100644 index 00000000000..c0837d0d866 --- /dev/null +++ b/mcs/ilasm/tests/test-pinvoke-b.il @@ -0,0 +1,40 @@ +// +// Test pinvoking unmanaged code +// +// Author(s): +// Jackson Harper (jackson@ximian.com) +// +// (C) 2003 Ximian Inc, (http://www.ximian.com) +// + +.assembly extern mscorlib { } +.assembly 'test-pinvoke-b' { } + + +.class public T { + + .method public static pinvokeimpl ("test-pinvoke" cdecl) + int32 ret_one () cil managed { } + + .method public static int32 test () + { + .entrypoint + + call int32 T::ret_one () + brfalse FAIL + + PASS: + ldstr "PASS" + call void [mscorlib]System.Console::WriteLine (string) + ldc.i4.0 + ret + + FAIL: + ldstr "FAIL" + call void [mscorlib]System.Console::WriteLine (string) + ldc.i4.1 + ret + } + +} + |