A few more fall-through comments.

diff --git a/src/microcode/syntax.c b/src/microcode/syntax.c
index ed9a9f5764dfdb64805523d8f80d24acc818e029..8a885a2473b6879ca719b73859841576e77d9f73 100644 (file)
--- a/src/microcode/syntax.c
+++ b/src/microcode/syntax.c
@@ -507,6 +507,7 @@ DEFINE_PRIMITIVE ("SCAN-LIST-FORWARD", Prim_scan_list_forward, 7, 7, 0)
        case syntaxcode_charquote:
          LOSE_IF_RIGHT_END (start);
          MOVE_RIGHT (start);
+         /* fall through */
 
        case syntaxcode_word:
        case syntaxcode_symbol:
@@ -976,6 +977,7 @@ DEFINE_PRIMITIVE ("SCAN-SEXPS-FORWARD", Prim_scan_sexps_forward, 7, 7, 0)
                      quoted = true;
                      DONE_IF (true);
                    }
+                 /* fall through */
 
                case syntaxcode_word:
                case syntaxcode_symbol: