This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: [patch, libfortran] PR32784 CONIN$, CONOUT$, and CONERR$ for Cygwin and mingw


Jerry DeLisle wrote:
The attached patch provides mapping the special file names to standard IO. This is an extension requested quite a ways back.

Applied and tested / regression tested on Cygwin running on WinNT workstation. I do not have a working mingw set-up and would much appreciate someone building and testing for that system.

OK for trunk if so tested and passes?

Here is a simple test case i have used. Redirection on the output apears to work as well.

      character(25) :: astring
      open(unit=29,file='CONOUT$')
      write(29,100)
100   format('Hello, world!')
      open(unit=39,file='CONERR$')
      write(39,200)
200   format('This goes to conerr$!')
      open(unit=49,file='CONIN$')
      read(49,'(a)') astring
      write(29,'(a)') astring
      end

Regards,

Jerry


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]