This is the mail archive of the 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, gfortran] g77's FNUM, STAT, FSTAT, and FLUSH intrinsics

On Sun, Nov 28, 2004 at 03:12:55PM +0100, Toon Moene wrote:
> Steve Kargl wrote:
> >ChangeLog for libgfortran:
> >


> >
> >ChangeLog for fortran:
> >


> etc.
> This is in principle OK, provided you take into account Janne 
> Blomqvist's remarks, and tell us on which system you bootstrapped.
> Sorry this took so long.

I do not have write after approval to the cvs tree.  Paul, Steven,
or you will need to commit the changes.

I have implemented FLUSH via Janne's comments.  That is, I have
left struct unix_stream in unix.c and left fd_flush() with its
static declaration.  FLUSH now uses Janne's flush() wrapper, which
is simply a redirection via a cast of *stream to a *unix_stream.

This has been bootstrapped and regression tested with no new regressions
on i386-unknown-freebsd6.0.

ChangeLog for libgfortran:

2004-11-28  Steven G. Kargl  <>

        * Add intrinsics/{flush.c,fnum.c,stat.c}
        * Regenerated
        * intrinsics/flush.c: ditto
        * intrinsics/fnum.c: ditto
        * intrinsics/stat.c: ditto
        * Add test
        * Regenerated
        * io/io.h (unit_to_fd): New prototype
        * io/unix.c (unit_to_fd): New function

ChangeLog for fortran:

2004-11-28  Steven G. Kargl  <>

        * check.c (gfc_check_flush,gfc_check_fnum,gfc_check_fstat, 
          gfc_check_fstat_sub,gfc_check_stat,gfc_check_stat_sub): New functions
        * check.c (gfc_check_getcwd_sub): Fix seg fault.
        * gfortran.h (GFC_ISYM_FNUM,GFC_ISYM_FSTAT,GFC_ISYM_STAT): New symbols
        * intrinsic.h (OPTIONAL,REQUIRED): New symbols
        * intrinsic.c (add_functions,add_subroutines): Use symbols
        * intrinsic.c (gmp.h): Remove unused include
        * intrinsic.c: Fix and add comments, fix function declarations
        * intrinsic.c (add_functions,add_subroutines): Add flush, fnum,
          fstat, and stat to intrinsics symbol tables.
        * intrinsic.h (gfc_check_flush,gfc_resolve_stat_sub,
          gfc_resolve_fstat_sub,gfc_resolve_stat): Add and sort prototypes.
        * iresolve.c (gfc_resolve_fnum,gfc_resolve_fstat,gfc_resolve_stat,
          gfc_resolve_flush,gfc_resolve_stat_sub,gfc_resolve_fstat_sub): New
        * trans-intrinsic.c (gfc_conv_intrinsic_function): Use symbols


Attachment: libgfortran.diff
Description: Text document

Attachment: fortran.diff
Description: Text document

Attachment: flush.c
Description: Text document

Attachment: fnum.c
Description: Text document

Attachment: stat.c
Description: Text document

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