Update the multiline test file

fortran-lang · Mar 14, 2022 · 6aac856 · 6aac856
1 parent f3966ae
commit 6aac856
Showing 1 changed file with 16 additions and 2 deletions.
diff --git a/test/test_source/diag/test_semicolon.f90 b/test/test_source/diag/test_semicolon.f90
@@ -1,5 +1,19 @@
 program test_semicolon
     implicit none
-    integer :: a = 1; character(len=1) :: v; real, parameter :: p = 0.1E-4
-    print*, a; print*, p
+    integer :: a = 1; character(len=1) :: v; real, parameter :: p = 0.1E-4; character(len=10), parameter :: str = "a;val;that"
+    character(len=100), parameter :: str2 = "a;string;"&
+    "that;becomes"//       &
+    ";"&
+    &"multiline";integer&
+    :: b;real           &
+    &,&
+    parameter&
+    ::&
+    c&
+    =&
+    100&
+    &0090;real :: d;real::e;real::f
+    print*, "one";
+    print*, str2
+    print*, a; print*, p; ! a; comment; that;contains; semi-colons
 end program test_semicolon