diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/c_kinds.c')
-rw-r--r-- | gcc/testsuite/gfortran.dg/c_kinds.c | 54 |
1 files changed, 54 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/c_kinds.c b/gcc/testsuite/gfortran.dg/c_kinds.c new file mode 100644 index 00000000000..f79a70f7532 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/c_kinds.c @@ -0,0 +1,54 @@ +/* { dg-do compile } */ +/* { dg-options "-std=c99" } */ + +#include <stdint.h> + +/* Note: int_fast*_t is currently not supported, cf. PR 448 */ +void param_test(short int my_short, int my_int, long int my_long, + long long int my_long_long, int8_t my_int8_t, + int_least8_t my_int_least8_t, /*int_fast8_t my_int_fast8_t,*/ + int16_t my_int16_t, int_least16_t my_int_least16_t, + /*int_fast16_t my_int_fast16_t,*/ int32_t my_int32_t, + int_least32_t my_int_least32_t, /*int_fast32_t my_int_fast32_t,*/ + int64_t my_int64_t, int_least64_t my_int_least64_t, + /*int_fast64_t my_int_fast64_t,*/ intmax_t my_intmax_t, + intptr_t my_intptr_t, float my_float, double my_double, + long double my_long_double, char my_char, _Bool my_bool); + + +int main(int argc, char **argv) +{ + short int my_short = 1; + int my_int = 2; + long int my_long = 3; + long long int my_long_long = 4; + int8_t my_int8_t = 1; + int_least8_t my_int_least8_t = 2; + int_fast8_t my_int_fast8_t = 3; + int16_t my_int16_t = 1; + int_least16_t my_int_least16_t = 2; + int_fast16_t my_int_fast16_t = 3; + int32_t my_int32_t = 1; + int_least32_t my_int_least32_t = 2; + int_fast32_t my_int_fast32_t = 3; + int64_t my_int64_t = 1; + int_least64_t my_int_least64_t = 2; + int_fast64_t my_int_fast64_t = 3; + intmax_t my_intmax_t = 1; + intptr_t my_intptr_t = 0; + float my_float = 1.0; + double my_double = 2.0; + long double my_long_double = 3.0; + char my_char = 'y'; + _Bool my_bool = 1; + + param_test(my_short, my_int, my_long, my_long_long, my_int8_t, + my_int_least8_t, /*my_int_fast8_t, */ my_int16_t, + my_int_least16_t,/* my_int_fast16_t,*/ my_int32_t, + my_int_least32_t,/* my_int_fast32_t,*/ my_int64_t, + my_int_least64_t,/* my_int_fast64_t,*/ my_intmax_t, + my_intptr_t, my_float, my_double, my_long_double, my_char, + my_bool); + + return 0; +}/* end main() */ |