INPUT-DIRECTORY   in
OUTPUT-DIRECTORY  out
ADD-CODE-START    "write(*,*) 'In __ROUTINE__ (__MODULE__)'"
ADD-CODE-END      "write(*,*) 'Leaving __ROUTINE__'"
ADD-CODE-STATEMENT "write(*,*) 'At __LINE__'"
ADD-USE            "use exceptions"
REPLACE-TYPE       "real"  real(dp)
REPLACE-STRING     X Y
ENABLE-IMPLICIT-NONE  yes
!
! Does this cause an error?
ENABLE-PRECONDITIONS

ENABLE-PRECONDITIONS yes

FILE              example.f90

!
! Now the check_init/check_reals example
!
CLEAR-ALL-SETTINGS

INPUT-DIRECTORY   in
OUTPUT-DIRECTORY  out
REPLACE-TYPE real type(checked_real)
ADD-USE "use check_reals"
ADD-CODE-STATEMENT "call check_assignment( __LINE__, '__FILE__' )"
!
! List of files to treat
!
FILE "check_init.f90"

