[3e8fb3b] | 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 | // |
---|
[dc8511c] | 7 | // limits.cfa -- |
---|
[3e8fb3b] | 8 | // |
---|
| 9 | // Author : Peter A. Buhr |
---|
| 10 | // Created On : Tue May 10 20:44:20 2016 |
---|
| 11 | // Last Modified By : Peter A. Buhr |
---|
[66812dd] | 12 | // Last Modified On : Sun Sep 27 08:45:43 2020 |
---|
| 13 | // Update Count : 10 |
---|
[ebcd82b] | 14 | // |
---|
[3e8fb3b] | 15 | |
---|
[6fbe9a5] | 16 | // Note: For testing the ability to load the constants defined in libcfa/src/limits.cfa, |
---|
| 17 | // see discussion in test const-init. |
---|
| 18 | |
---|
[73abe95] | 19 | #include <limits.hfa> |
---|
[d3b7937] | 20 | |
---|
| 21 | // Integral Constants |
---|
| 22 | |
---|
[2701c91] | 23 | signed char m = MIN; |
---|
| 24 | unsigned char m = MIN; |
---|
[3e8fb3b] | 25 | short int m = MIN; |
---|
[2701c91] | 26 | unsigned short int m = MIN; |
---|
[3e8fb3b] | 27 | int m = MIN; |
---|
[2701c91] | 28 | unsigned int m = MIN; |
---|
[3e8fb3b] | 29 | long int m = MIN; |
---|
[2701c91] | 30 | unsigned long int m = MIN; |
---|
[3e8fb3b] | 31 | long long int m = MIN; |
---|
[2701c91] | 32 | unsigned long long int m = MIN; |
---|
[d3b7937] | 33 | |
---|
[2701c91] | 34 | signed char M = MAX; |
---|
| 35 | unsigned char M = MAX; |
---|
[3e8fb3b] | 36 | short int M = MAX; |
---|
| 37 | unsigned short int M = MAX; |
---|
| 38 | int M = MAX; |
---|
| 39 | unsigned int M = MAX; |
---|
| 40 | long int M = MAX; |
---|
| 41 | unsigned long int M = MAX; |
---|
| 42 | long long int M = MAX; |
---|
| 43 | unsigned long long int M = MAX; |
---|
[d3b7937] | 44 | |
---|
| 45 | // Floating-Point Constants |
---|
| 46 | |
---|
[2701c91] | 47 | float m = MIN; |
---|
| 48 | double m = MIN; |
---|
| 49 | long double m = MIN; |
---|
| 50 | float _Complex m = MIN; |
---|
| 51 | double _Complex m = MIN; |
---|
| 52 | long double _Complex m = MIN; |
---|
| 53 | |
---|
| 54 | float M = MAX; |
---|
| 55 | double M = MAX; |
---|
| 56 | long double M = MAX; |
---|
| 57 | float _Complex M = MAX; |
---|
| 58 | double _Complex M = MAX; |
---|
| 59 | long double _Complex M = MAX; |
---|
| 60 | |
---|
[3e8fb3b] | 61 | float pi = PI; |
---|
| 62 | float pi_2 = PI_2; |
---|
| 63 | float pi_4 = PI_4; |
---|
| 64 | float _1_pi = _1_PI; |
---|
| 65 | float _2_pi = _2_PI; |
---|
| 66 | float _2_sqrt_pi = _2_SQRT_PI; |
---|
| 67 | |
---|
| 68 | double pi = PI; |
---|
| 69 | double pi_2 = PI_2; |
---|
| 70 | double pi_4 = PI_4; |
---|
| 71 | double _1_pi = _1_PI; |
---|
| 72 | double _2_pi = _2_PI; |
---|
| 73 | double _2_SQRT_pi = _2_SQRT_PI; |
---|
| 74 | |
---|
| 75 | long double pi = PI; |
---|
| 76 | long double pi_2 = PI_2; |
---|
| 77 | long double pi_4 = PI_4; |
---|
| 78 | long double _1_pi = _1_PI; |
---|
| 79 | long double _2_pi = _2_PI; |
---|
| 80 | long double _2_sqrt_pi = _2_SQRT_PI; |
---|
| 81 | |
---|
[2701c91] | 82 | float _Complex pi = PI; |
---|
| 83 | float _Complex pi_2 = PI_2; |
---|
| 84 | float _Complex pi_4 = PI_4; |
---|
| 85 | float _Complex _1_pi = _1_PI; |
---|
| 86 | float _Complex _2_pi = _2_PI; |
---|
| 87 | float _Complex _2_sqrt_pi = _2_SQRT_PI; |
---|
| 88 | |
---|
| 89 | double _Complex pi = PI; |
---|
| 90 | double _Complex pi_2 = PI_2; |
---|
| 91 | double _Complex pi_4 = PI_4; |
---|
| 92 | double _Complex _1_pi = _1_PI; |
---|
| 93 | double _Complex _2_pi = _2_PI; |
---|
| 94 | double _Complex _2_sqrt_pi = _2_SQRT_PI; |
---|
| 95 | |
---|
| 96 | long double _Complex pi = PI; |
---|
| 97 | long double _Complex pi_2 = PI_2; |
---|
| 98 | long double _Complex pi_4 = PI_4; |
---|
| 99 | long double _Complex _1_pi = _1_PI; |
---|
| 100 | long double _Complex _2_pi = _2_PI; |
---|
| 101 | long double _Complex _2_sqrt_pi = _2_SQRT_PI; |
---|
[3e8fb3b] | 102 | |
---|
| 103 | float e = E; |
---|
| 104 | float log2_e = LOG2_E; |
---|
| 105 | float log10_e = LOG10_E; |
---|
| 106 | float ln_2 = LN_2; |
---|
| 107 | float ln_10 = LN_10; |
---|
| 108 | float sqrt_2 = SQRT_2; |
---|
| 109 | float _1_sqrt_2 = _1_SQRT_2; |
---|
| 110 | |
---|
| 111 | double e = E; |
---|
| 112 | double log2_e = LOG2_E; |
---|
| 113 | double log10_e = LOG10_E; |
---|
| 114 | double ln_2 = LN_2; |
---|
| 115 | double ln_10 = LN_10; |
---|
| 116 | double sqrt_2 = SQRT_2; |
---|
| 117 | double _1_sqrt_2 = _1_SQRT_2; |
---|
| 118 | |
---|
| 119 | long double e = E; |
---|
| 120 | long double log2_e = LOG2_E; |
---|
| 121 | long double log10_e = LOG10_E; |
---|
| 122 | long double ln_2 = LN_2; |
---|
| 123 | long double ln_10 = LN_10; |
---|
| 124 | long double sqrt_2 = SQRT_2; |
---|
| 125 | long double _1_sqrt_2 = _1_SQRT_2; |
---|
| 126 | |
---|
[2701c91] | 127 | float _Complex e = E; |
---|
| 128 | float _Complex log2_e = LOG2_E; |
---|
| 129 | float _Complex log10_e = LOG10_E; |
---|
| 130 | float _Complex ln_2 = LN_2; |
---|
| 131 | float _Complex ln_10 = LN_10; |
---|
| 132 | float _Complex sqrt_2 = SQRT_2; |
---|
| 133 | float _Complex _1_sqrt_2 = _1_SQRT_2; |
---|
| 134 | |
---|
| 135 | double _Complex e = E; |
---|
| 136 | double _Complex log2_e = LOG2_E; |
---|
| 137 | double _Complex log10_e = LOG10_E; |
---|
| 138 | double _Complex ln_2 = LN_2; |
---|
| 139 | double _Complex ln_10 = LN_10; |
---|
| 140 | double _Complex sqrt_2 = SQRT_2; |
---|
| 141 | double _Complex _1_sqrt_2 = _1_SQRT_2; |
---|
| 142 | |
---|
| 143 | long double _Complex e = E; |
---|
| 144 | long double _Complex log2_e = LOG2_E; |
---|
| 145 | long double _Complex log10_e = LOG10_E; |
---|
| 146 | long double _Complex ln_2 = LN_2; |
---|
| 147 | long double _Complex ln_10 = LN_10; |
---|
| 148 | long double _Complex sqrt_2 = SQRT_2; |
---|
| 149 | long double _Complex _1_sqrt_2 = _1_SQRT_2; |
---|
[d3b7937] | 150 | |
---|
[ebcd82b] | 151 | int main(int argc, char const *argv[]) { |
---|
[66812dd] | 152 | #pragma message( "Compiled" ) // force non-empty .expect file |
---|
[ebcd82b] | 153 | } |
---|
| 154 | |
---|
[d3b7937] | 155 | // Local Variables: // |
---|
| 156 | // tab-width: 4 // |
---|
[dc8511c] | 157 | // compile-command: "cfa limits.cfa" // |
---|
[d3b7937] | 158 | // End: // |
---|