! { dg-do compile } ! { dg-options "-fdump-tree-original -fcoarray=lib" } ! ! STOP managed by the external library ! implicit none STOP end ! { dg-final { scan-tree-dump-times "_gfortran_caf_stop_str \\(0B, 0\\);" 1 "original" } }