This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
[testsuite, patch] Fix pr18052.f90
- From: Feng Wang <wf_cs at yahoo dot com>
- To: fortran at gcc dot gnu dot org, gcc-patches at gcc dot gnu dot org
- Date: Tue, 5 Apr 2005 15:57:22 +0800 (CST)
- Subject: [testsuite, patch] Fix pr18052.f90
It is only tested for excess, not for execution. We should use { dg-do run }
with spaces needed to separate the braces. I don't farmilar with dejagnu, could
someone tell me why? Thanks.
Best Regards,
Feng Wang
_________________________________________________________
Do You Yahoo!?
150万曲MP3疯狂搜，带您闯入音乐殿堂
http://music.yisou.com/
美女明星应有尽有，搜遍美图、艳图和酷图
http://image.yisou.com
1G就是1000兆，雅虎电邮自助扩容！
http://cn.rd.yahoo.com/mail_cn/tag/1g/*http://cn.mail.yahoo.com/event/mail_1g/Index: pr18025.f90
===================================================================
RCS file: /cvs/gcc/gcc/gcc/testsuite/gfortran.dg/pr18025.f90,v
retrieving revision 1.1.2.1
diff -c -3 -p -r1.1.2.1 pr18025.f90
*** pr18025.f90 23 Mar 2005 21:46:00 -0000 1.1.2.1
--- pr18025.f90 5 Apr 2005 03:53:51 -0000
***************
*** 1,5 ****
! PR libfortran/18025 <coudert@clipper.ens.fr>
! ! {dg-do run}
character(len=80) :: c
write(c, "('#',F0.2,'#')") 1.23
if (c /= '#1.23#') call abort
--- 1,5 ----
! PR libfortran/18025 <coudert@clipper.ens.fr>
! ! { dg-do run }
character(len=80) :: c
write(c, "('#',F0.2,'#')") 1.23
if (c /= '#1.23#') call abort