-
- Downloads
Steve Kargl <kargl@gcc.gnu.org>
PR fortran/98301 - random_init() is broken Correct implementation of random_init() when -fcoarray=lib is given. gcc/fortran/ChangeLog: PR fortran/98301 * trans-decl.c (gfc_build_builtin_function_decls): Move decl. * trans-intrinsic.c (conv_intrinsic_random_init): Use bool for lib-call of caf_random_init instead of logical (4-byte). * trans.h: Add tree var for random_init. libgfortran/ChangeLog: PR fortran/98301 * caf/libcaf.h (_gfortran_caf_random_init): New function. * caf/single.c (_gfortran_caf_random_init): New function. * gfortran.map: Added fndecl. * intrinsics/random_init.f90: Implement random_init.
Showing
- gcc/fortran/trans-decl.c 8 additions, 1 deletiongcc/fortran/trans-decl.c
- gcc/fortran/trans-intrinsic.c 20 additions, 15 deletionsgcc/fortran/trans-intrinsic.c
- gcc/fortran/trans.h 1 addition, 0 deletionsgcc/fortran/trans.h
- libgfortran/caf/libcaf.h 2 additions, 0 deletionslibgfortran/caf/libcaf.h
- libgfortran/caf/single.c 10 additions, 0 deletionslibgfortran/caf/single.c
- libgfortran/gfortran.map 5 additions, 0 deletionslibgfortran/gfortran.map
- libgfortran/intrinsics/random_init.f90 60 additions, 54 deletionslibgfortran/intrinsics/random_init.f90
Loading
Please register or sign in to comment