1132718Skan! { dg-do compile } 2132718Skan! PR fortran/66045 3169689Skan! 4169689Skan! Original code from Gerhard Steinmetz 5169689Skan! <gerhard dot steinmetz dot fortran at t-online dot de> 6169689Skanprogram p 7169689Skan contains 8132718Skan integer :: null=null() ! { dg-error "NULL appears on right-hand side" } 9169689Skanend 10169689Skan