X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/bc237bbae1393cacee9d534832a050f1148b0d8b..39b5e33587d580036cee66bc532c33d45c4bb6fe:/sbr/mf.c

diff --git a/sbr/mf.c b/sbr/mf.c
index 084643b4..a604ce91 100644
--- a/sbr/mf.c
+++ b/sbr/mf.c
@@ -288,6 +288,7 @@ again: ;
 		strcpy (err, "extraneous semi-colon");
 		return NOTOK;
 	    }
+	    /* FALLTHRU */
 	case LX_COMA: 
             mh_xfree(note);
             note = NULL;
@@ -391,6 +392,7 @@ again: ;
 			strcpy (err, "extraneous semi-colon");
 			return NOTOK;
 		    }
+		    /* FALLTHRU */
 		case LX_COMA: 
 		case LX_END: 
 		    return OK;
@@ -623,6 +625,7 @@ my_lex (char *buffer)
 		    continue;
 		case '(': 
 		    i++;
+		    /* FALLTHRU */
 		default: 
 		    ADDCHR(c);
 		    continue;
@@ -650,6 +653,7 @@ my_lex (char *buffer)
 			cp = NULL;
 			return (last_lex = LX_ERR);
 		    }
+		    /* FALLTHRU */
 		default: 
 		    ADDCHR(c);
 		    continue;
@@ -673,6 +677,7 @@ my_lex (char *buffer)
 			cp = NULL;
 			return (last_lex = LX_ERR);
 		    }
+		    /* FALLTHRU */
 		default: 
 		    ADDCHR(c);
 		    continue;
@@ -781,7 +786,8 @@ mfgets (FILE *in, char **bp)
 		    case '\t': 
 			*cp++ = '\n';
 			break;
-		}		/* fall into default case */
+		}
+		/* FALLTHRU */
 
 	    default: 
 		*cp++ = i;