Bug 38247 - problem with contained subprocedure.
Summary: problem with contained subprocedure.
Status: RESOLVED INVALID
Alias: None
Product: gcc
Classification: Unclassified
Component: fortran (show other bugs)
Version: 4.4.0
: P3 normal
Target Milestone: ---
Assignee: Not yet assigned to anyone
URL:
Keywords:
Depends on:
Blocks:
 
Reported: 2008-11-24 14:35 UTC by Norman S. Clerman
Modified: 2009-03-29 09:03 UTC (History)
2 users (show)

See Also:
Host:
Target:
Build:
Known to work:
Known to fail:
Last reconfirmed:


Attachments
archive described in the initial bug report (277.55 KB, application/x-compressed-tar)
2008-11-24 14:37 UTC, Norman S. Clerman
Details
updated, and corrected (I hope) archive (253.07 KB, application/x-compressed-tar)
2008-11-24 18:50 UTC, Norman S. Clerman
Details

Note You need to log in before you can comment on or make changes to this bug.
Description Norman S. Clerman 2008-11-24 14:35:20 UTC
I am using the following gfortran compiler, installed on a 32-bit computer running Open SUSE 10.0:

norm@linux:~/design/linux/gfortran/bug32_1/test> gfortran --version
GNU Fortran (GCC) 4.4.0 20081021 (experimental) [trunk revision 141258]
Copyright (C) 2008 Free Software Foundation, Inc.

After submitting this initial report I will upload an archive, bug32_1.tgz. Unpack it and invoke the the shell script contained in file bug32_1.sh. This will reproduce a problem with the compiler. After the script completes you will be able to see the problem by looking at cmndtype.xyz. I see the following:

norm@linux:~/design/linux/gfortran/bug32_1/test> more cmndtype.xyz
cmndtypeM.f90:697.29:

    CALL PutALine (user_line)
                            1
Error: There is no specific subroutine for the generic 'putaline' at (1)
cmndtypeM.f90:702.20:

    CALL PutALine ()
                   1
Error: There is no specific subroutine for the generic 'putaline' at (1)
cmndtypeM.f90:705.20:

    CALL PutALine ()
                   1
Error: There is no specific subroutine for the generic 'putaline' at (1)
cmndtypeM.f90:707.29:

    call PutALine (user_line)
                            1
Error: There is no specific subroutine for the generic 'putaline' at (1)

  If I remember correctly, I already submitted this problem with the AMD 64-bit version of the compiler, and you fixed it. Version 4.4 on my 64-bit AMD computer will compile this code.

  Thanks, as always, for your attention.

Norm Clerman
Comment 1 Norman S. Clerman 2008-11-24 14:37:55 UTC
Created attachment 16757 [details]
archive described in the initial bug report

Pleas see initial bug report.
Comment 2 kargls 2008-11-24 15:19:27 UTC
Your shell script contains items of the form

/home/norm/design/numrec/nrTypeM.f90

which of course doesn't exist so the shell script
aborts when executed.

BTW, if it is fixed on amd64, then it is mostlikely 
fixed on all target.  This is probably too old:
GNU Fortran (GCC) 4.4.0 20081021 (experimental) [trunk revision 141258]
Comment 3 Mikael Morin 2008-11-24 15:29:59 UTC
(In reply to comment #2)
> This is probably too old:
> GNU Fortran (GCC) 4.4.0 20081021 (experimental) [trunk revision 141258]
> 
Definitely, the bug is PR37445, which was fixed on 3rd November.
Comment 4 kargls 2008-11-24 15:32:29 UTC
After removing all of your full path names, I get

REMOVE:kargl[215] gfc4x WinModI.f90  -c -Wall -O3 -ffast-math -funroll-loops -std=f2003 -fno-backslash -owinmod.o >winmod.xyz
WinModI.f90:68: Error: Can't open included file 'FldSet1A.f90'
WinModI.f90:73: Error: Can't open included file 'FldSet2A.f90'
WinModI.f90:74.26:

There is no FldSet1A.f90 or FldSet2A.f90.  
REMOVE:kargl[216] find . -name FldSet\*
./FldSet.a90

Any chance you can 1) update to a newer compiler, and 2) cut this
down to a much smaller example.

PS: This shell script isn't a Bourne shell script.  It appears to be
    a csh script.  Add '#! /bin/csh' as the first line.
Comment 5 Tobias Burnus 2008-11-24 16:22:13 UTC
To add: There is currently a build problem for the linux 32bit version of the gfortran nightlies; thus there has been no newer build since about one month.
Comment 6 Norman S. Clerman 2008-11-24 18:50:39 UTC
Created attachment 16762 [details]
updated, and corrected (I hope) archive

hello,

Sorry for the mixup on the archive. I've attached a new one, bug32_1a.tgz that should work. It's a bash shell.

It seems to me that the problem is that you have not been able to build a new 32-bit version since you fixed the problem in the 64-bit version. Do you have any idea when you'll be able to update the former? In any case, let me know when you do.

Thanks for your help.

Norm
Comment 7 Norman S. Clerman 2008-11-24 18:54:39 UTC
Subject: Re:  problem with contained subprocedure.

Hello,

This appears to be the problem. In any case, I just submitted a new archive file. I hope this one's correct.

Thanks for your help. Let me know when the fix has been made to the 32-bit version as well.

Norm

---- burnus at gcc dot gnu dot org <gcc-bugzilla@gcc.gnu.org> wrote: 
> 
> 
> ------- Comment #5 from burnus at gcc dot gnu dot org  2008-11-24 16:22 -------
> To add: There is currently a build problem for the linux 32bit version of the
> gfortran nightlies; thus there has been no newer build since about one month.
> 
> 
> -- 
> 
> burnus at gcc dot gnu dot org changed:
> 
>            What    |Removed                     |Added
> ----------------------------------------------------------------------------
>                  CC|                            |burnus at gcc dot gnu dot
>                    |                            |org
> 
> 
> http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38247
> 
> ------- You are receiving this mail because: -------
> You reported the bug, or are watching the reporter.

Comment 8 Joost VandeVondele 2009-01-02 18:57:50 UTC
(In reply to comment #7)
> Subject: Re:  problem with contained subprocedure.
> 
> Hello,
> 
> This appears to be the problem. In any case, I just submitted a new archive
> file. I hope this one's correct.

No... it is not. You're missing files due to:

include "addLockBuffer1.a90"

and similar. Try to make sure that the testcases you attach reproduce the problem, by testing your testcase ;-)



> 
> Thanks for your help. Let me know when the fix has been made to the 32-bit
> version as well.
> 
> Norm
> 
> ---- burnus at gcc dot gnu dot org <gcc-bugzilla@gcc.gnu.org> wrote: 
> > 
> > 
> > ------- Comment #5 from burnus at gcc dot gnu dot org  2008-11-24 16:22 -------
> > To add: There is currently a build problem for the linux 32bit version of the
> > gfortran nightlies; thus there has been no newer build since about one month.
> > 
> > 
> > -- 
> > 
> > burnus at gcc dot gnu dot org changed:
> > 
> >            What    |Removed                     |Added
> > ----------------------------------------------------------------------------
> >                  CC|                            |burnus at gcc dot gnu dot
> >                    |                            |org
> > 
> > 
> > http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38247
> > 
> > ------- You are receiving this mail because: -------
> > You reported the bug, or are watching the reporter.
> 

Comment 9 Daniel Franke 2009-01-04 00:43:33 UTC
(In reply to comment #8)
> Try to make sure that the testcases you attach reproduce the
> problem, by testing your testcase ;-)

Marked as waiting for a testcase.
Comment 10 Francois-Xavier Coudert 2009-03-29 09:03:14 UTC
Closing for now, as it's been three months without news from the bug reporter. Please reopen the report and attached a testcase if it's still not fixed.