diff options
| author | DongHun Kwak <dh0128.kwak@samsung.com> | 2021-02-09 16:00:42 +0900 |
|---|---|---|
| committer | DongHun Kwak <dh0128.kwak@samsung.com> | 2021-02-09 16:00:42 +0900 |
| commit | 18a6a2390beac1918a783d9139c111c2813a6862 (patch) | |
| tree | 555a32f352b83abfa299e84edfa90bf8095e132b /tests | |
| parent | 0b02a3fcea1ca6f54c1148c08e983b0de24af8bf (diff) | |
| download | gpg2-18a6a2390beac1918a783d9139c111c2813a6862.tar.gz gpg2-18a6a2390beac1918a783d9139c111c2813a6862.tar.bz2 gpg2-18a6a2390beac1918a783d9139c111c2813a6862.zip | |
Imported Upstream version 2.2.13upstream/2.2.13
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/gpgscm/scheme.c | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/tests/gpgscm/scheme.c b/tests/gpgscm/scheme.c index 4384841..b188e36 100644 --- a/tests/gpgscm/scheme.c +++ b/tests/gpgscm/scheme.c @@ -44,6 +44,8 @@ # endif #endif +#include "gpgrt.h" /* For GGPRT_GCC_VERSION */ + /* Used for documentation purposes, to signal functions in 'interface' */ #define INTERFACE @@ -3438,6 +3440,11 @@ int list_length(scheme *sc, pointer a) { +#if GPGRT_GCC_VERSION >= 80000 +# pragma GCC diagnostic push +# pragma GCC diagnostic ignored "-Wimplicit-fallthrough" +#endif + #define s_retbool(tf) s_return(sc,(tf) ? sc->T : sc->F) /* kernel of this interpreter */ @@ -5323,6 +5330,11 @@ Eval_Cycle(scheme *sc, enum scheme_opcodes op) { } } +#if GPGRT_GCC_VERSION >= 80000 +# pragma GCC diagnostic pop +#endif + + typedef int (*test_predicate)(pointer); static int is_any(pointer p) { |