gcc/testsuite/gfortran.dg/c_kinds.c

   1 /* { dg-do compile } */
   2 /* { dg-options "-std=c99" } */
   3
   4 #include <stdint.h>
   5
   6 /* Note: int_fast*_t is currently not supported, cf. PR 448 */
   7 void param_test(short int my_short, int my_int, long int my_long,
   8                 long long int my_long_long, int8_t my_int8_t,
   9                 int_least8_t my_int_least8_t, /*int_fast8_t my_int_fast8_t,*/
  10                 int16_t my_int16_t, int_least16_t my_int_least16_t,
  11                 /*int_fast16_t my_int_fast16_t,*/ int32_t my_int32_t,
  12                 int_least32_t my_int_least32_t, /*int_fast32_t my_int_fast32_t,*/
  13                 int64_t my_int64_t, int_least64_t my_int_least64_t,
  14                 /*int_fast64_t my_int_fast64_t,*/ intmax_t my_intmax_t,
  15                 intptr_t my_intptr_t, float my_float, double my_double,
  16                 long double my_long_double, char my_char, _Bool my_bool);
  17
  18
  19 int main(int argc, char **argv)
  20 {
  21    short int my_short = 1;
  22    int my_int = 2;
  23    long int my_long = 3;
  24    long long int my_long_long = 4;
  25    int8_t my_int8_t = 1;
  26    int_least8_t my_int_least8_t = 2;
  27    int_fast8_t my_int_fast8_t = 3;
  28    int16_t my_int16_t = 1;
  29    int_least16_t my_int_least16_t = 2;
  30    int_fast16_t my_int_fast16_t = 3;
  31    int32_t my_int32_t = 1;
  32    int_least32_t my_int_least32_t = 2;
  33    int_fast32_t my_int_fast32_t = 3;
  34    int64_t my_int64_t = 1;
  35    int_least64_t my_int_least64_t = 2;
  36    int_fast64_t my_int_fast64_t = 3;
  37    intmax_t my_intmax_t = 1;
  38    intptr_t my_intptr_t = 0;
  39    float my_float = 1.0;
  40    double my_double = 2.0;
  41    long double my_long_double = 3.0;
  42    char my_char = 'y';
  43    _Bool my_bool = 1;
  44
  45    param_test(my_short, my_int, my_long, my_long_long, my_int8_t,
  46               my_int_least8_t, /*my_int_fast8_t,  */ my_int16_t,
  47               my_int_least16_t,/* my_int_fast16_t,*/ my_int32_t,
  48               my_int_least32_t,/* my_int_fast32_t,*/ my_int64_t,
  49               my_int_least64_t,/* my_int_fast64_t,*/ my_intmax_t,
  50               my_intptr_t, my_float, my_double, my_long_double, my_char,
  51               my_bool);
  52
  53    return 0;
  54 }/* end main() */