diff options
| author | Andre Vehreschild <vehre@gcc.gnu.org> | 2015-07-13 11:01:54 +0200 |
|---|---|---|
| committer | Andre Vehreschild <vehre@gcc.gnu.org> | 2015-07-13 11:01:54 +0200 |
| commit | 63631f7d15d7b774935a27e0d87b5ee71fbd9630 (patch) | |
| tree | 526949a813aafc36440a926d599606874b419795 /gcc/fortran/class.c | |
| parent | 2d87c1d472b4d881024bde41836ed826449e861a (diff) | |
| download | gcc-63631f7d15d7b774935a27e0d87b5ee71fbd9630.zip gcc-63631f7d15d7b774935a27e0d87b5ee71fbd9630.tar.gz gcc-63631f7d15d7b774935a27e0d87b5ee71fbd9630.tar.bz2 | |
re PR fortran/64589 ([OOP] Linking error due to undefined integer symbol with unlimited polymorphism)
gcc/testsuite/ChangeLog:
2015-07-13 Andre Vehreschild <vehre@gcc.gnu.org>
PR fortran/64589
* gfortran.dg/pr64589.f90: New test.
gcc/fortran/ChangeLog:
2015-07-13 Andre Vehreschild <vehre@gcc.gnu.org>
PR fortran/64589
* class.c (find_intrinsic_vtab): Put/Search vtabs for intrinsic
types in the top-level namespace.
From-SVN: r225730
Diffstat (limited to 'gcc/fortran/class.c')
| -rw-r--r-- | gcc/fortran/class.c | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/gcc/fortran/class.c b/gcc/fortran/class.c index 7990399..218973d 100644 --- a/gcc/fortran/class.c +++ b/gcc/fortran/class.c @@ -2511,10 +2511,8 @@ find_intrinsic_vtab (gfc_typespec *ts) sprintf (name, "__vtab_%s", tname); - /* Look for the vtab symbol in various namespaces. */ - gfc_find_symbol (name, gfc_current_ns, 0, &vtab); - if (vtab == NULL) - gfc_find_symbol (name, ns, 0, &vtab); + /* Look for the vtab symbol in the top-level namespace only. */ + gfc_find_symbol (name, ns, 0, &vtab); if (vtab == NULL) { |