1 files changed, 18 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/save_3.f90 b/gcc/testsuite/gfortran.dg/save_3.f90
new file mode 100644
index 000000000..ab2ee5268
--- /dev/null
+++ b/gcc/testsuite/gfortran.dg/save_3.f90
@@ -0,0 +1,18 @@
+! { 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
+
+! { dg-final { cleanup-modules "g95bug" } }