[geany/geany] e4f82f: tests: Add a test for forall Fortran issue

[Colomban Wendling]

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).