From d7b7862c5a2b5943d1ab8d2211e5b74f09ca6041 Mon Sep 17 00:00:00 2001
From: Richard Kreckel <kreckel@ginac.de>
Date: Fri, 1 Nov 2019 23:45:11 +0100
Subject: [PATCH] Avoid "this statement may fall through" warnings.

---
 src/complex/input/cl_N_read.cc      | 6 +++---
 src/float/input/cl_F_read.cc        | 2 +-
 src/float/input/cl_F_readparsed.cc  | 2 +-
 src/integer/input/cl_I_read.cc      | 2 +-
 src/rational/input/cl_RA_read.cc    | 2 +-
 src/rational/output/cl_RA_dprint.cc | 1 +
 src/real/input/cl_R_read.cc         | 4 ++--
 7 files changed, 10 insertions(+), 9 deletions(-)

diff --git a/src/complex/input/cl_N_read.cc b/src/complex/input/cl_N_read.cc
index 7b1b773..9365972 100644
--- a/src/complex/input/cl_N_read.cc
+++ b/src/complex/input/cl_N_read.cc
@@ -108,7 +108,7 @@ const cl_N read_complex (const cl_read_flags& flags, const char * string, const
 		var cl_signean sign = 0;
 		if (ptr == string_limit) goto not_rational_syntax;
 		switch (*ptr) {
-			case '-': sign = ~sign;
+			case '-': sign = ~sign; // fallthrough
 			case '+': ptr++;
 			default: break;
 		}
@@ -158,7 +158,7 @@ not_rational_syntax:
 		var cl_signean sign = 0;
 		if (ptr == string_limit) goto not_float_syntax;
 		switch (*ptr) {
-			case '-': sign = ~sign;
+			case '-': sign = ~sign; // fallthrough
 			case '+': ptr++;
 			default: break;
 		}
@@ -316,7 +316,7 @@ static const cl_N read_complex_number_rest (const cl_read_flags& flags, const ch
 			return complex(0,x);
 		}
 		switch (*ptr) {
-			case '+': ptr++;
+			case '+': ptr++; // fallthrough
 			case '-': break;
 			default: goto not_complex_syntax;
 		}
diff --git a/src/float/input/cl_F_read.cc b/src/float/input/cl_F_read.cc
index 2588457..f1097b3 100644
--- a/src/float/input/cl_F_read.cc
+++ b/src/float/input/cl_F_read.cc
@@ -69,7 +69,7 @@ const cl_F read_float (const cl_read_flags& flags, const char * string, const ch
 		var cl_signean sign = 0;
 		if (ptr == string_limit) goto not_float_syntax;
 		switch (*ptr) {
-			case '-': sign = ~sign;
+			case '-': sign = ~sign; // fallthrough
 			case '+': ptr++;
 			default: break;
 		}
diff --git a/src/float/input/cl_F_readparsed.cc b/src/float/input/cl_F_readparsed.cc
index c80885f..600f8a4 100644
--- a/src/float/input/cl_F_readparsed.cc
+++ b/src/float/input/cl_F_readparsed.cc
@@ -36,7 +36,7 @@ const cl_F read_float (unsigned int base, float_format_t prec, cl_signean sign,
 			ptr++; exp_len--; // Exponentmarker überlesen
 			var cl_signean exp_sign = 0; // Exponenten-Vorzeichen
 			switch (*ptr) {
-				case '-': exp_sign = ~exp_sign; // Vorzeichen := negativ
+				case '-': exp_sign = ~exp_sign; // fallthrough
 				case '+': ptr++; exp_len--; // Exponenten-Vorzeichen überlesen
 				default: ;
 			}
diff --git a/src/integer/input/cl_I_read.cc b/src/integer/input/cl_I_read.cc
index 320d5f5..b4267f5 100644
--- a/src/integer/input/cl_I_read.cc
+++ b/src/integer/input/cl_I_read.cc
@@ -96,7 +96,7 @@ const cl_I read_integer (const cl_read_flags& flags, const char * string, const
 		var cl_signean sign = 0;
 		if (ptr == string_limit) goto not_integer_syntax;
 		switch (*ptr) {
-			case '-': sign = ~sign;
+			case '-': sign = ~sign; // fallthrough
 			case '+': ptr++;
 			default: break;
 		}
diff --git a/src/rational/input/cl_RA_read.cc b/src/rational/input/cl_RA_read.cc
index ec9e7d8..4cda802 100644
--- a/src/rational/input/cl_RA_read.cc
+++ b/src/rational/input/cl_RA_read.cc
@@ -99,7 +99,7 @@ const cl_RA read_rational (const cl_read_flags& flags, const char * string, cons
 		var cl_signean sign = 0;
 		if (ptr == string_limit) goto not_rational_syntax;
 		switch (*ptr) {
-			case '-': sign = ~sign;
+			case '-': sign = ~sign; // fallthrough
 			case '+': ptr++;
 			default: break;
 		}
diff --git a/src/rational/output/cl_RA_dprint.cc b/src/rational/output/cl_RA_dprint.cc
index b4e1b5f..b3a4a88 100644
--- a/src/rational/output/cl_RA_dprint.cc
+++ b/src/rational/output/cl_RA_dprint.cc
@@ -43,6 +43,7 @@ void print_rational (std::ostream& stream, const cl_print_rational_flags& flags,
 				fprintchar(stream,'.');
 				return;
 			}
+			// fallthrough
 		default:
 			// Basis in #nR-Schreibweise ausgeben:
 			fprintchar(stream,'#');
diff --git a/src/real/input/cl_R_read.cc b/src/real/input/cl_R_read.cc
index b6b5cd4..4577cf4 100644
--- a/src/real/input/cl_R_read.cc
+++ b/src/real/input/cl_R_read.cc
@@ -106,7 +106,7 @@ const cl_R read_real (const cl_read_flags& flags, const char * string, const cha
 		var cl_signean sign = 0;
 		if (ptr == string_limit) goto not_rational_syntax;
 		switch (*ptr) {
-			case '-': sign = ~sign;
+			case '-': sign = ~sign; // fallthrough
 			case '+': ptr++;
 			default: break;
 		}
@@ -159,7 +159,7 @@ not_rational_syntax:
 		var cl_signean sign = 0;
 		if (ptr == string_limit) goto not_float_syntax;
 		switch (*ptr) {
-			case '-': sign = ~sign;
+			case '-': sign = ~sign; // fallthrough
 			case '+': ptr++;
 			default: break;
 		}
-- 
2.45.0