1! { dg-do compile } 2! PR20849 - An external symbol may not have a initializer. 3! Contributed by Joost VandeVondele <jv244@cam.ac.uk> 4REAL, EXTERNAL :: X=0 ! { dg-error "not have an initializer" } 5END 6