blob: 5ab4a95ce9cdcc5c729dfe3d0dd0bf392bedfaf0 (
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
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
|
// 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_EXCEPT.c (test 2)
**
** Purpose: Tests the PAL implementation of the PAL_TRY and
** PAL_EXCEPT functions. Exceptions are not forced to ensure
** the proper blocks are hit.
**
**
**===================================================================*/
#include <palsuite.h>
int __cdecl main(int argc, char *argv[])
{
BOOL bTry = FALSE;
BOOL bExcept = FALSE;
BOOL bTestA = TRUE;
if (0 != PAL_Initialize(argc, argv))
{
return FAIL;
}
/*
** test to make sure we get into the exception block
*/
PAL_TRY
{
if (!bTestA)
{
Fail("PAL_TRY_EXCEPT: ERROR ->"
" It appears the first try block was hit a second time.\n");
}
bTry = TRUE; /* indicate we hit the PAL_TRY block */
}
PAL_EXCEPT(EXCEPTION_EXECUTE_HANDLER)
{
bExcept = TRUE; /* indicate we hit the PAL_EXCEPT block */
}
PAL_ENDTRY;
if (!bTry)
{
Trace("PAL_TRY_EXCEPT: ERROR -> It appears the code in the PAL_TRY"
" block was not executed.\n");
}
if (bExcept)
{
Trace("PAL_TRY_EXCEPT: ERROR -> It appears the code in the first"
" PAL_EXCEPT block was executed even though no exceptions were "
"encountered.\n");
}
/* did we hit all the proper code blocks? */
if(!bTry || bExcept)
{
Fail("");
}
/*
** test to make sure we skip the second exception block
*/
bTry = FALSE;
bExcept = FALSE;
bTestA = FALSE; /* we are now going into the second block test */
PAL_TRY
{
if (bTestA)
{
Fail("PAL_TRY_EXCEPT: ERROR -> It appears"
" the second try block was hit too early.\n");
}
bTry = TRUE; /* indicate we hit the PAL_TRY block */
}
PAL_EXCEPT(EXCEPTION_EXECUTE_HANDLER)
{
if (bTestA)
{
Fail("PAL_TRY_EXCEPT: ERROR -> It appears"
" the second except block was hit too early.\n");
}
bExcept = TRUE; /* indicate we hit the PAL_TRY block */
}
PAL_ENDTRY;
if (!bTry)
{
Trace("PAL_TRY_EXCEPT: ERROR -> It appears the code in the second"
" PAL_TRY block was not executed.\n");
}
if (bExcept)
{
Trace("PAL_TRY_EXCEPT: ERROR -> It appears the code in the second"
" PAL_EXCEPT block was executed even though no exceptions were "
"encountered.\n");
}
/* did we hit all the proper code blocks? */
if(!bTry || bExcept)
{
Fail("\n");
}
PAL_Terminate();
return PASS;
}
|
