| Author |
Message |
 Topic: pgf90: FILE INQUIRE and SIZE option does not work |
Breitenfeld
Replies: 3
Views: 1159
|
 Forum: Programming and Compiling Posted: Wed Mar 20, 2013 10:21 pm Subject: pgf90: FILE INQUIRE and SIZE option does not work |
Could you tell me the status of this, was it a bug? was it reproducible?
Thanks |
| Topic: pgf90: FILE INQUIRE and SIZE option does not work |
Breitenfeld
Replies: 3
Views: 1159
|
Forum: Programming and Compiling Posted: Mon Feb 18, 2013 9:11 am Subject: pgf90: FILE INQUIRE and SIZE option does not work |
OS: 2.6.18-308.13.1.el5PAE #1 SMP i686 i686 i386 GNU/Linux
pgif90 versions: 12.5-0, 11.9-0
Program main
integer :: file_sz
OPEN(UNIT=10,FILE='test.in')
INQUIRE(UNIT=10, SIZE=file_sz)
... |
| Topic: C_LOC in an array constructor causes internal compiler error |
Breitenfeld
Replies: 2
Views: 921
|
Forum: Programming and Compiling Posted: Tue Aug 30, 2011 1:16 pm Subject: C_LOC in an array constructor causes internal compiler error |
When compiling the code:
use iso_c_binding
INTEGER(C_INT), DIMENSION(1:1), TARGET :: A = (/1/)
INTEGER(C_INT), DIMENSION(1:1), TARGET :: B = (/2/)
TYPE(C_PTR), DIMENSION(1:1,1:2), TARGET :: wd ... |
| Topic: pgf90 problems compiling BIND(C) function. |
Breitenfeld
Replies: 5
Views: 2307
|
Forum: Programming and Compiling Posted: Mon Aug 09, 2010 8:06 am Subject: pgf90 problems compiling BIND(C) function. |
If the type declaration is moved to the module scope the code compiles.
MODULE liter_cb_mod
USE ISO_C_BINDING
TYPE, BIND(C) :: MYFTYPE
INTEGER(C_INT) :: I, J
REAL(C_FLOAT) :: S
END TYP ... |
| Topic: pgf90 problems compiling BIND(C) function. |
Breitenfeld
Replies: 5
Views: 2307
|
Forum: Programming and Compiling Posted: Fri Aug 06, 2010 1:57 pm Subject: pgf90 problems compiling BIND(C) function. |
I'm a bit confused what you mean, I'm following the Fortran 2003 standard, if you look at section 15.2.3 Interoperability of derived types and C struct types:
2 A Fortran derived type is interoper ... |
| |
Search
Memberlist
Register
Profile
Log in