diff options
Diffstat (limited to 'src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY')
4 files changed, 117 insertions, 0 deletions
diff --git a/src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/CMakeLists.txt b/src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/CMakeLists.txt new file mode 100644 index 0000000000..f6aa0cb2d9 --- /dev/null +++ b/src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/CMakeLists.txt @@ -0,0 +1,4 @@ +cmake_minimum_required(VERSION 2.8.12.2) + +add_subdirectory(test1) + diff --git a/src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/test1/CMakeLists.txt b/src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/test1/CMakeLists.txt new file mode 100644 index 0000000000..a5fdd26924 --- /dev/null +++ b/src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/test1/CMakeLists.txt @@ -0,0 +1,19 @@ +cmake_minimum_required(VERSION 2.8.12.2) + +set(CMAKE_INCLUDE_CURRENT_DIR ON) + +set(SOURCES + PAL_TRY_LEAVE_FINALLY.c +) + +add_executable(paltest_pal_try_leave_finally_test1 + ${SOURCES} +) + +add_dependencies(paltest_pal_try_leave_finally_test1 coreclrpal) + +target_link_libraries(paltest_pal_try_leave_finally_test1 + pthread + m + coreclrpal +) diff --git a/src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/test1/PAL_TRY_LEAVE_FINALLY.c b/src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/test1/PAL_TRY_LEAVE_FINALLY.c 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.c @@ -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; + +} diff --git a/src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/test1/testinfo.dat b/src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/test1/testinfo.dat new file mode 100644 index 0000000000..8a90ef392c --- /dev/null +++ b/src/pal/tests/palsuite/exception_handling/PAL_TRY_LEAVE_FINALLY/test1/testinfo.dat @@ -0,0 +1,17 @@ +# 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. + +Version = 1.0 +Section = file_io +Function = PAL_TRY, PAL_LEAVE and PAL_FINALLY +Name = Test for PAL_TRY, PAL_LEAVE and PAL_EXCEPT +Type = DEFAULT +EXE1 = pal_try_leave_finally +LANG = cpp +Description += Since these three are so closely connected, they are tested together. += The PAL_TRY block contains a PAL_LEAVE which kicks execution to += the PAL_FINALLY block. Booleans are used to ensure each of the += code blocks are properly hit. + |