source: doc/theses/andrew_beach_MMath/code/resume-finally.cfa @ ea593a3

ADTast-experimentalenumforall-pointer-decayjacob/cs343-translationnew-ast-unique-exprpthread-emulationqualifiedEnum
Last change on this file since ea593a3 was ea593a3, checked in by Andrew Beach <ajbeach@…>, 3 years ago

First draft of all the exception benchmarks. There is an issue with the Cforall linking.

  • Property mode set to 100644
File size: 697 bytes
Line 
1// Throw Across Finally
2#include <exception.hfa>
3#include <stdlib.hfa>
4
5EHM_EXCEPTION(empty_exception)();
6
7EHM_VIRTUAL_TABLE(empty_exception, empty_vt);
8
9void unwind_finally(unsigned int frames) {
10        if (frames) {
11                try {
12                        unwind_finally(frames - 1);
13                } finally {
14                        // ...
15                }
16        } else {
17                throwResume (empty_exception){&empty_vt};
18        }
19}
20
21int main(int argc, char * argv[]) {
22        unsigned int times = 1;
23        unsigned int total_frames = 1;
24        if (2 < argc) {
25                times = strtol(argv[1], 0p, 10);
26        }
27        if (3 < argc) {
28                total_frames = strtol(argv[2], 0p, 10);
29        }
30
31        for (int count = 0 ; count < times ; ++count) {
32                try {
33                        unwind_finally(total_frames);
34                } catchResume (empty_exception *) {
35                        // ...
36                }
37        }
38}
Note: See TracBrowser for help on using the repository browser.