summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-12-24 15:04:57 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-12-24 15:04:57 (GMT)
commit032451725b0fa15246376ee6831e52cd9bbe4a9e (patch)
treea493380f80e8a01ceff38828cd9226200d5d043d /generic
parent51bf99fdf5def9a1842cccf4308cc8d429c1ef21 (diff)
downloadtcl-032451725b0fa15246376ee6831e52cd9bbe4a9e.zip
tcl-032451725b0fa15246376ee6831e52cd9bbe4a9e.tar.gz
tcl-032451725b0fa15246376ee6831e52cd9bbe4a9e.tar.bz2
Add FALLTHRU markers, eliminating gcc warning using -Wextra
Diffstat (limited to 'generic')
-rw-r--r--generic/tclOOCall.c2
-rw-r--r--generic/tclStrToD.c1
2 files changed, 3 insertions, 0 deletions
diff --git a/generic/tclOOCall.c b/generic/tclOOCall.c
index f3474b6..423a41e 100644
--- a/generic/tclOOCall.c
+++ b/generic/tclOOCall.c
@@ -1677,6 +1677,7 @@ AddPrivatesFromClassChainToCallContext(
return 1;
}
}
+ /* FALLTHRU */
case 0:
return 0;
}
@@ -1768,6 +1769,7 @@ AddSimpleClassChainToCallContext(
privateDanger |= AddSimpleClassChainToCallContext(superPtr,
methodNameObj, cbPtr, doneFilters, flags, filterDecl);
}
+ /* FALLTHRU */
case 0:
return privateDanger;
}
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c
index 9e4e2c9..eb71276 100644
--- a/generic/tclStrToD.c
+++ b/generic/tclStrToD.c
@@ -847,6 +847,7 @@ TclParseNumber(
acceptState = state;
acceptPoint = p;
acceptLen = len;
+ /* FALLTHRU */
case ZERO_B:
zerob:
if (c == '0') {