summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/c_char_driver.c
blob: ca41ab1ed73bb25dd1dcad960bc1bb512813a1f7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
void param_test(char my_char, char my_char_2);
void sub0(void);
void sub1(char *my_char);

int main(int argc, char **argv)
{
  char my_char = 'y';
  
  param_test('y', 'z');
  sub0();
  sub1(&my_char);
  
  return 0;
}