diff --git a/src/ksp/ksp/impls/gmres/fgmres/fgmres.c b/src/ksp/ksp/impls/gmres/fgmres/fgmres.c
index 1e57d7eab53..9299deac1f7 100644
--- a/src/ksp/ksp/impls/gmres/fgmres/fgmres.c
+++ b/src/ksp/ksp/impls/gmres/fgmres/fgmres.c
@@ -172,7 +172,8 @@ PetscErrorCode KSPFGMRESCycle(PetscInt *itcount,KSP ksp)
 
     /* new entry in hessenburg is the 2-norm of our new direction */
     ierr = VecNorm(VEC_VV(loc_it+1),NORM_2,&tt);CHKERRQ(ierr);
-
+    KSPCheckNorm(ksp,tt);
+ 
     *HH(loc_it+1,loc_it)  = tt;
     *HES(loc_it+1,loc_it) = tt;
 
