blob: 675c2a594783f9f8e24611533cdd648bc30adb61 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
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;
}
|