View previous topic :: View next topic |
Author |
Message |
Thomas
Joined: 18 Feb 2005 Posts: 56 Location: Gummersbach, Germany
|
Posted: Mon Mar 28, 2011 7:59 am Post subject: Character assignment |
|
|
Please find below the short version of a program with an incorrect character assignment:
program testchar
Implicit None
Character (len=3), External :: WTPB03
Character (len=3) :: xxx
Type WTPROG_TA
Character (len=3) :: BZ(40)
End Type WTPROG_TA
Type (WTPROG_TA) :: TAAKT
TAAKT%BZ(1) = 'abc'
write (*,*) TAAKT%BZ(1)
! WTPB03 will not be called; '€€€' is assigned to BZ instead of 'xyz'
TAAKT%BZ(1) = WTPB03 ()
write (*,*) TAAKT%BZ(1)
! WTPB03 will be called; correct assignment to BZ
xxx = WTPB03 ()
TAAKT%BZ(1) = xxx
write (*,*) TAAKT%BZ(1)
end program
Function WTPB03 ()
Implicit None
Character (len=3) :: WTPB03
WTPB03 = 'xyz'
END
I'm using version 6.00 of FTN95. _________________ Thomas |
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7928 Location: Salford, UK
|
Posted: Mon Mar 28, 2011 8:43 am Post subject: |
|
|
Yes ths looks like fault in the compiler that we need to fix. |
|
Back to top |
|
|
Thomas
Joined: 18 Feb 2005 Posts: 56 Location: Gummersbach, Germany
|
Posted: Wed Apr 06, 2011 8:02 am Post subject: FTN95 version prospect |
|
|
Menwhile I installed version 6.10 of FTN95. A previous problem (mouse hover with SDBG) is solved now. But the character assignment ist still pending.
When do you expect to issue a FTN95 version with correct assignment? _________________ Thomas |
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7928 Location: Salford, UK
|
Posted: Wed Apr 06, 2011 8:27 am Post subject: |
|
|
I will aim to have this fixed for the next release.
If you look back to the announcements in this forum you will get an impression of how frequently new releases appear. |
|
Back to top |
|
|
Thomas
Joined: 18 Feb 2005 Posts: 56 Location: Gummersbach, Germany
|
Posted: Fri Nov 14, 2014 6:45 pm Post subject: Fault in Character assignment: Successfully sorted |
|
|
Paul,
I did not follow the progress for a longer period. Today I found the problem with faulty character assignment solved.
Thanks!
Thomas _________________ Thomas |
|
Back to top |
|
|
|