summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg
diff options
context:
space:
mode:
authorjvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4>2007-06-24 18:58:36 +0000
committerjvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4>2007-06-24 18:58:36 +0000
commit6a41ab4e2f1fe8559c5fc58fa8b71add52d527d5 (patch)
tree9a1cb5c87c35a1add0a9feaef2e512e67cc60530 /gcc/testsuite/gfortran.dg
parentc704db51e487a466c5974e4c6d29125ee8f9432c (diff)
downloadgcc-6a41ab4e2f1fe8559c5fc58fa8b71add52d527d5.tar.gz
2007-06-24 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/32446 * gfortran.dg/fmt_huge.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@125986 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/testsuite/gfortran.dg')
-rw-r--r--gcc/testsuite/gfortran.dg/fmt_huge.f906
1 files changed, 6 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/fmt_huge.f90 b/gcc/testsuite/gfortran.dg/fmt_huge.f90
new file mode 100644
index 00000000000..43c4e2ac273
--- /dev/null
+++ b/gcc/testsuite/gfortran.dg/fmt_huge.f90
@@ -0,0 +1,6 @@
+! { dg-do run }
+! PR32446 printing big numbers in F0.1 format.
+! This segfaulted before the patch.
+ open (10, status="scratch")
+ write (10,'(F0.1)') huge(1.0)
+ END