diff --git a/lib/fst4_decode.f90 b/lib/fst4_decode.f90 index 5fb591ffa..8b6135530 100644 --- a/lib/fst4_decode.f90 +++ b/lib/fst4_decode.f90 @@ -613,7 +613,7 @@ contains endif call this%callback(nutc,smax1,nsnr,xdt,fsig,msg, & iaptype,qual,ntrperiod,lwspr,fmid,w50) - if(iwspr.eq.0 .and. nb.lt.0) go to 900 +! if(iwspr.eq.0 .and. nb.lt.0) go to 900 goto 800 endif enddo ! metrics