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 | // quotedKeyword.cfa -- test quoted keyword usage
|
---|
8 | //
|
---|
9 | // Author : Peter A. Buhr
|
---|
10 | // Created On : Wed May 27 17:56:53 2015
|
---|
11 | // Last Modified By : Peter A. Buhr
|
---|
12 | // Last Modified On : Thu Feb 23 20:31:05 2023
|
---|
13 | // Update Count : 26
|
---|
14 | //
|
---|
15 |
|
---|
16 | #include <fstream.hfa>
|
---|
17 |
|
---|
18 | static struct {
|
---|
19 | int ``otype;
|
---|
20 | int ``struct;
|
---|
21 | } st = { 10, 10 };
|
---|
22 |
|
---|
23 | typedef int ``forall;
|
---|
24 | ``forall xxx = 10;
|
---|
25 |
|
---|
26 | int ``_Alignas, ``_Alignof, ``__alignof, ``__alignof__, ``asm, ``__asm, ``__asm__, ``_At, ``_Atomic, ``__attribute,
|
---|
27 | ``__attribute__, ``auto, ``_Bool, ``break, ``case, ``catch, ``catchResume, ``char, ``choose, ``_Complex, ``__complex,
|
---|
28 | ``__complex__, ``const, ``__const, ``__const__, ``continue, ``default, ``disable, ``do, ``double, ``dtype, ``else,
|
---|
29 | ``enable, ``enum, ``__extension__, ``extern, ``fallthru, ``finally, ``float, ``__float128, ``for, ``forall, ``fortran,
|
---|
30 | ``ftype, ``_Generic, ``goto, ``if, ``_Imaginary, ``__imag, ``__imag__, ``inline, ``__inline, ``__inline__, ``int,
|
---|
31 | ``__int128, ``__label__, ``long, ``lvalue, ``_Noreturn, ``__builtin_offsetof, ``otype, ``register, ``restrict,
|
---|
32 | ``__restrict, ``__restrict__, ``return, ``short, ``signed, ``__signed, ``__signed__, ``sizeof, ``static,
|
---|
33 | ``_Static_assert, ``struct, ``switch, ``_thread, ``_Thread_local, ``throw, ``throwResume, ``trait, ``try, ``typedef,
|
---|
34 | ``typeof, ``__typeof, ``__typeof__, ``union, ``unsigned, ``__builtin_va_list, ``void, ``volatile, ``__volatile,
|
---|
35 | ``__volatile__, ``while;
|
---|
36 |
|
---|
37 | int main() {
|
---|
38 | int ``if = 0;
|
---|
39 | ``catch = 1;
|
---|
40 | st.``otype = 2;
|
---|
41 | st.``struct = 3;
|
---|
42 | ``throw = 4;
|
---|
43 | sout | ``catch + st.``otype + st.``struct + ``throw;
|
---|
44 | }
|
---|
45 |
|
---|
46 | // Local Variables: //
|
---|
47 | // tab-width: 4 //
|
---|
48 | // compile-command: "cfa quotedKeyword.cfa" //
|
---|
49 | // End: //
|
---|