Added allocate stmt from NOTE 6.19

rasmussn · rasmussn · commit fb4c74679bfb · 2013-08-23T10:10:49.000-07:00
diff --git a/tests/rule-tests/R626.f90 b/tests/rule-tests/R626.f90
@@ -7,5 +7,8 @@
 allocate(integer::a,b)
 allocate(a,stat=i, errmsg=blah, source=k)
 
+! NOTE 6.19
+ALLOCATE (X (N), B (-3 : M, 0:9), STAT = IERR_ALLOC)
+
 end
 
