@Echo off
REM compile and invoke the Windowed Debugger.
set salfenvar=trap_underflows
FTN95 %1.F90 /LIST /NO_OFFSETS /DEBUG /CHECK /UNDEF /FULL_DEBUG /LINK %2 %3 %4
if errorlevel 1 GoTo Done
set sourcepath=c:\hdk\fortex\test
start wsdbg %1
:Done