------- Comment #8 from burnus at gcc dot gnu dot org 2009-06-07 13:59 ------- Compile time check is now there (4.5 trunk). Missing is a run-time check. Example:
real, dimension(1,0) :: a, b, c integer :: sp(3), i a = 4.0 sp = 1 i = 1 b = eoshift (a,sp(1:i)) ! Invalid end NAG f95 writes at run time: Shape mismatch (dimension 1) between ARRAY and SHIFT in CSHIFT -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36874