diff --git a/PDP10/pdp10_rp.c b/PDP10/pdp10_rp.c
index 30db9c3e..160efd5f 100644
--- a/PDP10/pdp10_rp.c
+++ b/PDP10/pdp10_rp.c
@@ -1027,6 +1027,7 @@ switch (uptr->FUNC) {                                   /* case on function */
             clearerr (uptr->fileref);
             return SCPE_IOERR;
             }
+        /* fall through */
 
     case FNC_WRITEH:                                    /* write headers stub */
         update_rpcs (CS1_DONE, drv);                    /* set done */