blob: 310014a156a73fdbe7eb47a821b88a1de449e100 (
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
|
PROCEDURE Mixed()
PP_DEFINE __LIB
TRY
OUTPUT 1 DIV 0
CATCH
OUTPUT 1
ENDTRY
PP_UNDEF __LIB
TRY
OUTPUT 1 DIV 0
CATCH
OUTPUT 2
ENDTRY
TRY
CALL LibraryError()
CATCH
OUTPUT 3
ENDTRY
PP_IFDEF Never
PP_DEFINE __LIB
PP_ENDIF
TRY
OUTPUT 1 DIV 0
CATCH
OUTPUT 4
ENDTRY
ENDPROCEDURE
PP_DEFINE __LIB
PROCEDURE LibraryError()
CALL NestedError()
ENDPROCEDURE
PROCEDURE NestedError()
OUTPUT 1 DIV 0
ENDPROCEDURE
TEMPLATE <T>
PROCEDURE TemplateError()
OUTPUT 1 DIV 0
ENDPROCEDURE
CLASS DeleteError
PROCEDURE DELETE()
OUTPUT 1 DIV 0
ENDPROCEDURE
ENDCLASS
PROCEDURE DeleteOnExit()
DECLARE X : DeleteError
ENDPROCEDURE
PP_UNDEF __LIB
|
