Chromium Code Reviews
chromiumcodereview-hr@appspot.gserviceaccount.com (chromiumcodereview-hr) | Please choose your nickname with Settings | Help | Chromium Project | Gerrit Changes | Sign out
(201)

Unified Diff: gcc/gcc/testsuite/gfortran.dg/proc_ptr_common_1.f90

Issue 3050029: [gcc] GCC 4.5.0=>4.5.1 (Closed) Base URL: ssh://git@gitrw.chromium.org:9222/nacl-toolchain.git
Patch Set: Created 10 years, 5 months ago
Use n/p to move between diff chunks; N/P to move between comments. Draft comments are only viewable by you.
Jump to:
View side-by-side diff with in-line comments
Download patch
« no previous file with comments | « gcc/gcc/testsuite/gfortran.dg/proc_ptr_8.f90 ('k') | gcc/gcc/testsuite/gfortran.dg/read_bad_advance.f90 » ('j') | no next file with comments »
Expand Comments ('e') | Collapse Comments ('c') | Show Comments Hide Comments ('s')
Index: gcc/gcc/testsuite/gfortran.dg/proc_ptr_common_1.f90
diff --git a/gcc/gcc/testsuite/gfortran.dg/proc_ptr_common_1.f90 b/gcc/gcc/testsuite/gfortran.dg/proc_ptr_common_1.f90
index 0cfdec03d5adcfeaf49a4c616b4fefde3bd2dd06..df2ef0b79cc2e7477f6610c23e133ae6e986d66f 100644
--- a/gcc/gcc/testsuite/gfortran.dg/proc_ptr_common_1.f90
+++ b/gcc/gcc/testsuite/gfortran.dg/proc_ptr_common_1.f90
@@ -19,7 +19,7 @@ program main
integer :: x,y
intrinsic sin,cos
procedure(real), pointer :: func1
- external func2
+ real, external :: func2
pointer func2
common /com/ func1,func2,x,y
x = 5
@@ -27,4 +27,5 @@ program main
func1 => cos
func2 => sin
call one()
-end program main
+end program main
+
« no previous file with comments | « gcc/gcc/testsuite/gfortran.dg/proc_ptr_8.f90 ('k') | gcc/gcc/testsuite/gfortran.dg/read_bad_advance.f90 » ('j') | no next file with comments »

Powered by Google App Engine
This is Rietveld 408576698