source: tests/linking/exception-withthreads.cfa @ ded6c2a6

ast-experimental
Last change on this file since ded6c2a6 was c715e5f, checked in by Andrew Beach <ajbeach@…>, 2 years ago

Removed most of the exception macros (EHM_ group). Made changes to the exception declaration pass to do so.

  • Property mode set to 100644
File size: 780 bytes
Line 
1//
2// Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo
3//
4// The contents of this file are covered under the licence agreement in the
5// file "LICENCE" distributed with Cforall.
6//
7// exception-withthreads.cfa --
8//
9// Author           : Andrew Beach
10// Created On       : Thr 13 16:12:00 2020
11// Last Modified By : Andrew Beach
12// Last Modified On : Fri 14 11:20:00 2020
13// Update Count     : 0
14//
15
16#include <stdlib.hfa>
17#include "../exceptions/with-threads.hfa"
18
19exception ping {};
20vtable(ping) ping_vt;
21
22int main(void) {
23        try {
24                throwResume (ping){&ping_vt};
25        } catchResume (ping *) {
26                printf("%s threads\n", threading_enabled() ? "with" : "no");
27        }
28        return 0;
29}
30
31// Local Variables: //
32// tab-width: 4 //
33// compile-command: "cfa nothreads.cfa" //
34// End: //
Note: See TracBrowser for help on using the repository browser.