errlog message added when IO stalled by cyclesup

src/exe/rt_emon/src/rt_emon.c

@@ -1435,9 +1435,12 @@ cSup_exec (
 	o->AlarmCheck = FALSE;
 	o->DelayNoted = TRUE;
 	if (o->DelayAction == 2) {
+	  int prev_rwflag = l.iohp->IOReadWriteFlag;
 	  l.iohp->IOReadWriteFlag = FALSE;
 	  l.nodep->EmergBreakTrue = TRUE;
 	  errh_SetStatus( MH__IOSTALLED);
+	  if ( prev_rwflag)
+	    errh_Fatal("CycleSup delayed with action Stop I/O");
 	}
       }
     }

src/lib/rt/src/rt_plc_thread.c

@@ -705,9 +705,12 @@ scan (
 	time_GetTime(&now);
 	delay_action = csup_Exec(&sts, tp->csup_lh, (pwr_tDeltaTime *) &tp->sync_time, (pwr_tDeltaTime *) &tp->after_scan, &now);
 	if (delay_action == 2) {
+	  int prev_rwflag = pp->IOHandler->IOReadWriteFlag;
 	  pp->IOHandler->IOReadWriteFlag = FALSE;
 	  pp->Node->EmergBreakTrue = TRUE;
 	  errh_SetStatus( PLC__IOSTALLED);
+	  if ( prev_rwflag)
+	    errh_Fatal("CycleSup delayed with action Stop I/O");	  
 	}
       }