Hello, Thank you for fixing the last bug I reported, number 37445.
I am attempting to build my lens design program. I encounter the following errors when I compile file geomotfM.f90: /home/norm/design/source/geomotfM.f90:836.4: function CreateLine ( RayData, MaxFreq, NoOfGoodRays, ChromaticWeights, Err 1 Error: PUBLIC function 'createline' at (1) cannot be of PRIVATE type 'tline' This is incorrect. Both the type TLine and the function CreateLine are private to the module. The NAG, Intel and g95 compilers all compile this. I tried to reproduce this problem with a small example, but I did not succeed. As soon as I am assigned a bug number, I will upload a tar file, bug5.tgz to the following address: [EMAIL PROTECTED] Unpack the file and invoke the shell script bug5.sh to reproduce the problem. I'll indicate the bug number in the subject line. I am running Open SuSE 10.1 on a dual core Athlon chip. I'm using the gcc-trunk build: [EMAIL PROTECTED]:~/design/gfortran/production> gfortran --version GNU Fortran (GCC) 4.4.0 20081109 (experimental) [trunk revision 141714] Copyright (C) 2008 Free Software Foundation, Inc. Thank you for your attention. Norm Clerman -- Summary: bug5 Product: gcc Version: 4.4.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: clerman at fuse dot net http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38065