[Bug fortran/52846] [F2008] Support submodules

["pault at gcc dot gnu.org" <gcc-bugzilla at gcc dot gnu dot org>]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=52846

--- Comment #14 from Paul Thomas <pault at gcc dot gnu.org> ---
(In reply to Salvatore Filippone from comment #13)
> Created attachment 35996 [details]
> test case
> 
> Cleaned up a bit of noise due to the process of reducing the test case: it
> was spitting out a legitimate but pointless liker error about
> erractionrestore.
> 
> [sfilippo@jacobi tlink]$ gfortran -o testlk testlk.f90 
> /tmp/ccbhv5VA.o: In function `__error_impl_mod_MOD_ser_error_print_stack':
> testlk.f90:(.text+0x1b): undefined reference to `__error_mod_MOD_serror'
> /tmp/ccbhv5VA.o: In function `__error_impl_mod_MOD_par_error_print_stack':
> testlk.f90:(.text+0x3b): undefined reference to `__error_mod_MOD_perror'
> /tmp/ccbhv5VA.o: In function `__error_mod_MOD_par_error_handler':
> testlk.f90:(.text+0x6a): undefined reference to `__error_mod_MOD_perror'
> testlk.f90:(.text+0x86): undefined reference to `__error_mod_MOD_perror'
> /tmp/ccbhv5VA.o: In function `__error_mod_MOD_ser_error_handler':
> testlk.f90:(.text+0xa5): undefined reference to `__error_mod_MOD_serror'
> /tmp/ccbhv5VA.o: In function `MAIN__':
> testlk.f90:(.text+0xda): undefined reference to `__error_mod_MOD_serror'
> collect2: error: ld returned 1 exit status

OK - this compiles and runs if the PRIVATE statement is removed. As soon as I
return to the privacy issue, I will check that this testcase is OK.

Thanks

Paul