more

[ICEs.git] / 306833 / 306833.F90

diff --git a/306833/306833.F90 b/306833/306833.F90
new file mode 100644 (file)
index 0000000..433d08d
--- /dev/null
+++ b/306833/306833.F90
@@ -0,0 +1,11 @@
+module blahblah
+ character(len=1), parameter :: ch10 = char(10)
+end module
+
+program testme3
+ use blahblah
+ implicit none
+ character(len=100) :: message
+
+ write(6, '(a,a)') ch10,'invars1m : enter jdtset='
+end program