I'd like our coding standard to say that any called routine in a subroutine
must have an explicit interface (either from an INTERFACE block or a module
USE), or be declared EXTERNAL. To enforce this I want a code scanner that
searches for CALL lines and reports any oddities for manual checking.
Before I delved into Perl to do this, does anyone have software that could
analyse
SUBROUTINE fred
USE module, ONLY : jim
INTERFACE
SUBROUTINE eric
END SUBROUTINE eric
END interface
EXTERNAL jane
CALL jim
CALL eric
CALL jane
CALL sally
END SUBROUTINE fred
and say that sally was the odd one out?
John
--
John Bray, Numerical Weather Prediction Tel: +44 (0) 1344 854035
Room 337 [log in to unmask]
The Met. Office http://www.met-office.gov.uk
London Road, Bracknell, RG12 2SZ, UK http://www.jrbray.org.uk
|