https://gcc.gnu.org/bugzilla/show_bug.cgi?id=113313
Bug ID: 113313
Summary: execute_command_line hangs at run time
Product: gcc
Version: 13.1.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: john.harper at vuw dot ac.nz
Target Milestone: ---
This program compiles and executes as expected with 3 other compilers (ifort,
ifx, flang). With gfortran 13.1.0 it compiles happily but prints nothing and
hangs at run time. My operating system is ubuntu1~22.04.
program test
! f2008 using execute_command_line and assuming Linux
implicit none
print "(A,L2)",'I am john',iam('john')
print "(A,L2)",'I am JOHN',iam('JOHN')
contains
logical function iam( name)
character(*),intent(in)::name
integer estat
character(len(name)+38):: cmd
cmd = 'if [ `whoami` != "'//name//'" ]; then exit 1; fi'
call execute_command_line(cmd,exitstat=estat)
iam = (estat==0)
end function iam
end program test
The other compilers all printed
I am john T
I am JOHN F
