add explicit fallthrough comments

Author: Enchufa2

inst/include/Rcpp/algo.h

@@ -64,14 +64,17 @@ inline bool __any( RandomAccessIterator __first, RandomAccessIterator __last, co
 	  if (*__first == __val)
 	    return true;
 	  ++__first;
+	  // fallthrough
 	case 2:
 	  if (*__first == __val)
 	    return true;
 	  ++__first;
+	  // fallthrough
 	case 1:
 	  if (*__first == __val)
 	    return true;
 	  ++__first;
+	  // fallthrough
 	case 0:
 	default:
 	  return false;

inst/include/Rcpp/macros/unroll.h

@@ -33,11 +33,11 @@ for ( ; __trip_count > 0 ; --__trip_count) {   \
 }                                              \
 switch (n - i){                                \
   case 3:                                      \
-    *TARGET++ = SOURCE[i++] ;                  \
+    *TARGET++ = SOURCE[i++] ; /* fallthrough */ \
   case 2:                                      \
-    *TARGET++ = SOURCE[i++] ;                  \
+    *TARGET++ = SOURCE[i++] ; /* fallthrough */ \
   case 1:                                      \
-    *TARGET++ = SOURCE[i++] ;                  \
+    *TARGET++ = SOURCE[i++] ; /* fallthrough */ \
   case 0:                                      \
   default:                                     \
       {}                                       \

inst/include/Rcpp/vector/RangeIndexer.h

@@ -35,11 +35,11 @@
     }                                                \
     switch (size_ - i){                              \
       case 3:                                        \
-          start[i] OP input[i] ; i++ ;               \
+          start[i] OP input[i] ; i++ ; /* fallthrough */ \
       case 2:                                        \
-          start[i] OP input[i] ; i++ ;               \
+          start[i] OP input[i] ; i++ ; /* fallthrough */ \
       case 1:                                        \
-          start[i] OP input[i] ; i++ ;               \
+          start[i] OP input[i] ; i++ ; /* fallthrough */ \
       case 0:                                        \
       default:                                       \
           return *this ;                             \