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, 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:
> >

(snip)

> >
> >ChangeLog for fortran:
> >

(snip)

> 
> 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  <kargls@comcast.net>

        * Makefile.am: Add intrinsics/{flush.c,fnum.c,stat.c}
        * Makefile.in: Regenerated
        * intrinsics/flush.c: ditto
        * intrinsics/fnum.c: ditto
        * intrinsics/stat.c: ditto
        * config.h.in (HAVE_STRUCT_STAT_ST_BLKSIZE,HAVE_STRUCT_STAT_ST_BLOCKS,
          HAVE_STRUCT_STAT_ST_RDEV): Add
        * configure.ac: Add test
        * configure.in: 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  <kargls@comcast.net>

        * 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
          functions
        * trans-intrinsic.c (gfc_conv_intrinsic_function): Use symbols

-- 
Steve

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]