Avoid "this statement may fall through" warnings.

diff --git a/src/complex/input/cl_N_read.cc b/src/complex/input/cl_N_read.cc
index 7b1b773c0521d3e5826077ceefb314a37c03496b..9365972a5d71227fbc1c49c7dd936681fa339353 100644 (file)
--- 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 25884571194345081de630eb7847f5d581381986..f1097b34d4d4be7fb480e6cbeb5bc04ccd130a05 100644 (file)
--- 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 c80885fe461b104c6953697c088c5247e544e0e5..600f8a46c01edb97ce14661fd2aabdbdb8715290 100644 (file)
--- 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 320d5f5151a0f5563e65f464d0b797d28a538970..b4267f5799e2ff30b2a9242871e1796c46a7de15 100644 (file)
--- 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 ec9e7d8300bf62aea418cab509394c1e4c88fe72..4cda80250603be249f0c3dee84e04902294dea77 100644 (file)
--- 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 b4e1b5fb319981d759c54f84be8bb1b6a7a60129..b3a4a88f419afb82392798376c45172ffc6aab08 100644 (file)
--- 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 b6b5cd4ed842dde60f65b49f0b62ebf5603ac4ea..4577cf45537bc767d3e49939f50f937db63d373c 100644 (file)
--- 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;
                }