RegressionSourceProcessing
changeset 72:f16dd5dbfb70
still not hoisted but at least reflect the changes since the files are already there
| author | m_utkej@utke2.site |
|---|---|
| date | Fri Dec 04 17:28:44 2009 -0600 (2009-12-04) |
| parents | ac8fde669374 |
| children | c27aeef14bcb |
| files | Reference/hoistFuncCall.free.pre.f90 Reference/hoistFuncCall.free.pre.post.f90 Reference/versionInfo.txt |
line diff
1.1 --- a/Reference/hoistFuncCall.free.pre.f90 Fri Dec 04 17:28:18 2009 -0600 1.2 +++ b/Reference/hoistFuncCall.free.pre.f90 Fri Dec 04 17:28:44 2009 -0600 1.3 @@ -1,4 +1,7 @@ 1.4 +module OAD_intrinsics 1.5 +end module 1.6 program functionComment 1.7 +use OAD_intrinsics 1.8 real :: x 1.9 1.10 x = 1.5D0 1.11 @@ -6,15 +9,16 @@ 1.12 end program functionComment 1.13 1.14 function f(x) 1.15 +use OAD_intrinsics 1.16 real :: x,f 1.17 1.18 f = 5 1.19 end function f 1.20 1.21 subroutine oad_s_f(x,f) 1.22 +use OAD_intrinsics 1.23 real,intent(out) :: f 1.24 real :: x 1.25 1.26 f = 5 1.27 end subroutine oad_s_f 1.28 -
2.1 --- a/Reference/hoistFuncCall.free.pre.post.f90 Fri Dec 04 17:28:18 2009 -0600 2.2 +++ b/Reference/hoistFuncCall.free.pre.post.f90 Fri Dec 04 17:28:44 2009 -0600 2.3 @@ -1,4 +1,8 @@ 2.4 +module OAD_intrinsics 2.5 +end module 2.6 program functionComment 2.7 +use OAD_intrinsics 2.8 + use OAD_active 2.9 real :: x 2.10 2.11 x = 1.5D0 2.12 @@ -6,15 +10,18 @@ 2.13 end program functionComment 2.14 2.15 function f(x) 2.16 +use OAD_intrinsics 2.17 + use OAD_active 2.18 real :: x,f 2.19 2.20 f = 5 2.21 end function f 2.22 2.23 subroutine oad_s_f(x,f) 2.24 +use OAD_intrinsics 2.25 + use OAD_active 2.26 real,intent(out) :: f 2.27 real :: x 2.28 2.29 f = 5 2.30 end subroutine oad_s_f 2.31 -
3.1 --- a/Reference/versionInfo.txt Fri Dec 04 17:28:18 2009 -0600 3.2 +++ b/Reference/versionInfo.txt Fri Dec 04 17:28:44 2009 -0600 3.3 @@ -1,11 +1,11 @@ 3.4 OpenAD hg:269:0a6c115c3825 3.5 -Open64 svn:872 3.6 -OpenADFortTk hg:1127+:c4cfb55f4ded+ 3.7 -OpenAnalysis hg:25+:7a9899d3b1b6+ 3.8 +Open64 svn:874 3.9 +OpenADFortTk hg:1128+:2e955d582e70+ 3.10 +OpenAnalysis hg:25:7a9899d3b1b6 3.11 xercesc svn:45 3.12 xaifBooster hg:1101:ae6264f2ccad 3.13 xaif hg:217:a52cc5ab9afa 3.14 angel hg:154:08f720d14859 3.15 boost/boost svn:51018 3.16 RevolveF9X hg:3:32019b4179be 3.17 -OpenADFortTk/tools/SourceProcessing hg:538+:b8ed1c1ef2f8+ 3.18 +OpenADFortTk/tools/SourceProcessing hg:546:33a001c70b43
