[geany/geany] e4f82f: tests: Add a test for forall Fortran issue
Colomban Wendling
git-noreply at xxxxx
Mon Jun 24 20:57:10 UTC 2013
Branch: refs/heads/master
Author: Colomban Wendling <ban at herbesfolles.org>
Committer: Colomban Wendling <ban at herbesfolles.org>
Date: Mon, 24 Jun 2013 20:57:10 UTC
Commit: e4f82f28b70ba5582c13d7543c930cd185e70938
https://github.com/geany/geany/commit/e4f82f28b70ba5582c13d7543c930cd185e70938
Log Message:
-----------
tests: Add a test for forall Fortran issue
Test file from Alexander Eberspächer.
Modified Paths:
--------------
tests/ctags/Makefile.am
tests/ctags/forall_module.f90
tests/ctags/forall_module.f90.tags
Modified: tests/ctags/Makefile.am
1 files changed, 1 insertions(+), 0 deletions(-)
===================================================================
@@ -120,6 +120,7 @@ test_sources = \
enum.java \
events.cs \
extern_variable.h \
+ forall_module.f90 \
format.pl \
func_typedef.h \
general.cs \
Modified: tests/ctags/forall_module.f90
26 files changed, 26 insertions(+), 0 deletions(-)
===================================================================
@@ -0,0 +1,26 @@
+! a module that uses a forall block
+
+module with_forall
+
+ real :: a
+
+contains
+
+ subroutine sub_with_forall(x)
+ real, intent(inout) :: x(:)
+
+ integer :: i
+
+ forall(i=1:size(x))
+ x(i) = 0.5**i
+ end forall
+ end subroutine sub_with_forall
+
+
+ function two() result(res)
+ real :: res
+
+ res = 2.0
+ end function two
+
+end module with_forall
Modified: tests/ctags/forall_module.f90.tags
5 files changed, 5 insertions(+), 0 deletions(-)
===================================================================
@@ -0,0 +1,5 @@
+# format=tagmanager
+a�16384�with_forall�0
+sub_with_forall�64�with_forall�0
+two�16�with_forall�0
+with_forall�256�0
--------------
This E-Mail was brought to you by github_commit_mail.py (Source: https://github.com/geany/infrastructure).
More information about the Commits
mailing list