https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98301
--- Comment #13 from CVS Commits <cvs-commit at gcc dot gnu.org> --- The releases/gcc-11 branch has been updated by Andre Vehreschild <ve...@gcc.gnu.org>: https://gcc.gnu.org/g:002745ca3668fc5e87c22acc81caaeaaadf9c47a commit r11-8515-g002745ca3668fc5e87c22acc81caaeaaadf9c47a Author: Andre Vehreschild <ve...@gcc.gnu.org> Date: Sun Jun 6 12:06:31 2021 +0200 PR fortran/98301 - random_init() is broken Correct implementation of random_init() when -fcoarray=lib is given. Backport from mainline. 2021-06-06 Andre Vehreschild <ve...@gcc.gnu.org> Steve Kargl <ka...@gcc.gnu.org> 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.
