Mercurial > hg > CbC > CbC_gcc
view gcc/testsuite/gfortran.dg/c_ptr_tests_7_driver.c @ 145:1830386684a0
gcc-9.2.0
author | anatofuz |
---|---|
date | Thu, 13 Feb 2020 11:34:05 +0900 |
parents | 04ced10e8804 |
children |
line wrap: on
line source
/* This is the driver for c_ptr_test_7. */ extern void abort(void); void *func0(); int main(int argc, char **argv) { /* The Fortran module c_ptr_tests_7 contains function func0, which has return type of c_ptr, and should set the return value to c_null_ptr. */ if (func0() != 0) abort(); return 0; }