| [2bb4a01] | 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 | // LinkageSpec.hpp -- | 
|---|
|  | 8 | // | 
|---|
|  | 9 | // Author           : Aaron B. Moss | 
|---|
|  | 10 | // Created On       : Thu May 9 10:00:00 2019 | 
|---|
|  | 11 | // Last Modified By : Aaron B. Moss | 
|---|
|  | 12 | // Last Modified On : Thu May 9 10:00:00 2019 | 
|---|
|  | 13 | // Update Count     : 1 | 
|---|
|  | 14 | // | 
|---|
|  | 15 |  | 
|---|
|  | 16 | #pragma once | 
|---|
|  | 17 |  | 
|---|
|  | 18 | #include <string> | 
|---|
|  | 19 |  | 
|---|
|  | 20 | #include "Bitfield.hpp" | 
|---|
|  | 21 | #include "Common/CodeLocation.h" | 
|---|
|  | 22 |  | 
|---|
|  | 23 | namespace ast { | 
|---|
|  | 24 |  | 
|---|
| [a300e4a] | 25 | namespace Linkage { | 
|---|
| [2bb4a01] | 26 |  | 
|---|
| [260dad7] | 27 | /// Bitflags for linkage specifiers | 
|---|
|  | 28 | enum { | 
|---|
|  | 29 | Mangle       = 1 << 0, | 
|---|
|  | 30 | Generate     = 1 << 1, | 
|---|
|  | 31 | Overrideable = 1 << 2, | 
|---|
|  | 32 | Builtin      = 1 << 3, | 
|---|
|  | 33 | GccBuiltin   = 1 << 4 | 
|---|
|  | 34 | }; | 
|---|
| [a300e4a] | 35 |  | 
|---|
| [260dad7] | 36 | /// Bitflag type for storage classes | 
|---|
|  | 37 | struct spec_flags { | 
|---|
|  | 38 | union { | 
|---|
|  | 39 | unsigned int val; | 
|---|
|  | 40 | struct { | 
|---|
|  | 41 | bool is_mangled      : 1; | 
|---|
|  | 42 | bool is_generatable  : 1; | 
|---|
|  | 43 | bool is_overrideable : 1; | 
|---|
|  | 44 | bool is_builtin      : 1; | 
|---|
|  | 45 | bool is_gcc_builtin  : 1; | 
|---|
| [2bb4a01] | 46 | }; | 
|---|
| [a300e4a] | 47 | }; | 
|---|
| [2bb4a01] | 48 |  | 
|---|
| [260dad7] | 49 | constexpr spec_flags( unsigned int val ) : val(val) {} | 
|---|
|  | 50 | }; | 
|---|
|  | 51 |  | 
|---|
|  | 52 | using Spec = bitfield<spec_flags>; | 
|---|
|  | 53 |  | 
|---|
|  | 54 | /// If `cmd` = "C" returns `spec` with `is_mangled = false`. | 
|---|
|  | 55 | /// If `cmd` = "Cforall" returns `spec` with `is_mangled = true`. | 
|---|
|  | 56 | Spec update( CodeLocation loc, Spec spec, const std::string * cmd ); | 
|---|
|  | 57 |  | 
|---|
|  | 58 | /// A human-readable name for this spec | 
|---|
|  | 59 | std::string name( Spec spec ); | 
|---|
|  | 60 |  | 
|---|
|  | 61 | // Pre-defined flag combinations | 
|---|
|  | 62 |  | 
|---|
|  | 63 | /// C built-in defined in prelude | 
|---|
|  | 64 | constexpr Spec Intrinsic  = { Mangle | Generate | Overrideable | Builtin }; | 
|---|
|  | 65 | /// Ordinary Cforall | 
|---|
|  | 66 | constexpr Spec Cforall    = { Mangle | Generate }; | 
|---|
|  | 67 | /// C code: not overloadable, not mangled | 
|---|
|  | 68 | constexpr Spec C          = { Generate }; | 
|---|
|  | 69 | /// Built by translator (e.g. struct assignment) | 
|---|
|  | 70 | constexpr Spec AutoGen    = { Mangle | Generate | Overrideable }; | 
|---|
|  | 71 | /// GCC internal | 
|---|
|  | 72 | constexpr Spec Compiler   = { Mangle | Builtin | GccBuiltin }; | 
|---|
|  | 73 | /// Mangled builtins | 
|---|
|  | 74 | constexpr Spec BuiltinCFA = { Mangle | Generate | Builtin }; | 
|---|
|  | 75 | /// Non-mangled builtins | 
|---|
|  | 76 | constexpr Spec BuiltinC   = { Generate | Builtin }; | 
|---|
|  | 77 |  | 
|---|
| [a300e4a] | 78 | } | 
|---|
| [2bb4a01] | 79 |  | 
|---|
|  | 80 | } | 
|---|
|  | 81 |  | 
|---|
|  | 82 | // Local Variables: // | 
|---|
|  | 83 | // tab-width: 4 // | 
|---|
|  | 84 | // mode: c++ // | 
|---|
|  | 85 | // compile-command: "make install" // | 
|---|
|  | 86 | // End: // | 
|---|