+
−! { dg-do compile }
+
−
+
−! PR fortran/35837
+
−! We used do have a problem with resolving "save all" and nested namespaces.
+
−
+
−! Contributed by Tobias Burnus <burnus@gcc.gnu.org>
+
−
+
−module g95bug
+
−save
+
−integer :: i=20
+
−contains
+
−pure function tell_i() result (answer)
+
−  integer :: answer
+
−  answer=i
+
−end function tell_i
+
−end module g95bug