finalyze moving

tests/sapfor/loops_combiner/test_3.for

@@ -0,0 +1,31 @@
+      program loops_combiner_test
+      implicit none
+      parameter (l = 16,m = 6)
+      real :: a(l),b(l),c(l)
+
+! shouldn't be combined because of print:
+      do it1 = 1,l
+         a(it1) = it1
+         print *, 'test print' 
+      enddo 
+
+      do it2 = 1,l
+         b(it2) = it2
+      enddo  
+
+! shouldn't be combined because of goto:
+      do it3 = 1,l - 1
+         c(it3) = it3
+      enddo 
+
+      do it4 = 1,l - 1
+         do  k4 = 1,l
+            a(k4) = k4 + it4
+            go to 100
+         enddo  
+      enddo 
+	  
+100   a(0) = 0
+
+      end
+