OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

re PR fortran/37498 (Incorrect array value returned - 4.3 ABI Broken) 

2008-09-25  Jerry DeLisle  <jvdelisle@gcc.gnu.org

	PR fortran/37498
	* trans-io.c (build_dt): Revert previous patch..
	* ioparm.def: Delete IOPARM_dt_f2003.

From-SVN: r140683
This commit is contained in:
Jerry DeLisle 2008-09-26 06:15:21 +00:00
parent e7b012c044
commit 5e1bdeb75f
3 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/fortran/ChangeLog
View File

@ -1,3 +1,9 @@
2008-09-25 Jerry DeLisle <jvdelisle@gcc.gnu.org
PR fortran/37498
* trans-io.c (build_dt): Revert previous patch..
* ioparm.def: Delete IOPARM_dt_f2003.
2008-09-25 Tobias Burnus <burnus@net-b.de>
PR fortran/37504

1
gcc/fortran/ioparm.def
View File

@ -93,4 +93,3 @@ IOPARM (dt, pad, 1 << 22, char1)
IOPARM (dt, round, 1 << 23, char2)
IOPARM (dt, sign, 1 << 24, char1)
IOPARM (dt, u, 0, pad)
#define IOPARM_dt_f2003 (1 << 25)

2
gcc/fortran/trans-io.c
View File

@ -1641,7 +1641,7 @@ build_dt (tree function, gfc_code * code)
tree tmp, var;
gfc_expr *nmlname;
gfc_namelist *nml;
unsigned int mask = IOPARM_dt_f2003;
unsigned int mask = 0;
gfc_start_block (&block);
gfc_init_block (&post_block);