summaryrefslogtreecommitdiff
path: root/src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/test1/PAL_TRY_LEAVE_FINALLY.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/test1/PAL_TRY_LEAVE_FINALLY.cpp')
-rw-r--r--src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/test1/PAL_TRY_LEAVE_FINALLY.cpp77
1 files changed, 77 insertions, 0 deletions
diff --git a/src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/test1/PAL_TRY_LEAVE_FINALLY.cpp b/src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/test1/PAL_TRY_LEAVE_FINALLY.cpp
new file mode 100644
index 0000000000..675c2a5947
--- /dev/null
+++ b/src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/test1/PAL_TRY_LEAVE_FINALLY.cpp
@@ -0,0 +1,77 @@
+// Licensed to the .NET Foundation under one or more agreements.
+// The .NET Foundation licenses this file to you under the MIT license.
+// See the LICENSE file in the project root for more information.
+
+/*=====================================================================
+**
+** Source: pal_try_leave_finally.c
+**
+** Purpose: Tests the PAL implementation of the PAL_TRY, PAL_LEAVE
+** and PAL_FINALLY functions.
+**
+**
+**===================================================================*/
+
+
+
+#include <palsuite.h>
+
+
+int __cdecl main(int argc, char *argv[])
+{
+ BOOL bTry = FALSE;
+ BOOL bFinally = FALSE;
+ BOOL bLeave = TRUE;
+
+ if (0 != PAL_Initialize(argc, argv))
+ {
+ return FAIL;
+ }
+
+
+ PAL_TRY
+ {
+ bTry = TRUE; /* indicate we hit the PAL_TRY block */
+
+ goto Done;
+
+ bLeave = FALSE; /* indicate we stuck around */
+ Done: ;
+ }
+ PAL_FINALLY
+ {
+ bFinally = TRUE; /* indicate we hit the PAL_FINALLY block */
+ }
+ PAL_ENDTRY;
+
+ /* did we go where we were meant to go */
+ if (!bTry)
+ {
+ Trace("PAL_TRY_FINALLY: ERROR -> It appears the code in the PAL_TRY"
+ " block was not executed.\n");
+ }
+
+ if (!bLeave)
+ {
+ Trace("PAL_TRY_FINALLY: ERROR -> It appears code was executed after "
+ "PAL_LEAVE was called. It should have jumped directly to the "
+ "PAL_FINALLY block.\n");
+ }
+
+ if (!bFinally)
+ {
+ Trace("PAL_TRY_FINALLY: ERROR -> It appears the code in the PAL_FINALLY"
+ " block was not executed.\n");
+ }
+
+ /* did we hit all the code blocks? */
+ if(!bTry || !bLeave || !bFinally)
+ {
+ Fail("");
+ }
+
+
+ PAL_Terminate();
+ return PASS;
+
+}