From 12f0a0a1b21c1461b15e4d06cb7473014a7ef14f Mon Sep 17 00:00:00 2001 From: Bryan Newbold Date: Sat, 30 Sep 2017 21:40:19 -0700 Subject: patch: disable bigrecy() on 32-bit platforms This temporary patch gets r4rstest.scm to pass on 32-bit platforms, which fixes FTBS (as tests are required for the package build). --- debian/patches/bypass_bigrecy_32bit.patch | 26 ++++++++++++++++++++++++++ 1 file changed, 26 insertions(+) create mode 100644 debian/patches/bypass_bigrecy_32bit.patch (limited to 'debian/patches/bypass_bigrecy_32bit.patch') diff --git a/debian/patches/bypass_bigrecy_32bit.patch b/debian/patches/bypass_bigrecy_32bit.patch new file mode 100644 index 0000000..276bc8c --- /dev/null +++ b/debian/patches/bypass_bigrecy_32bit.patch @@ -0,0 +1,26 @@ +Description: Bypass bigrecy() optimization on 32-bit to fix test failure +Author: Bryan Newbold +Forwarded: yes +--- a/scl.c ++++ b/scl.c +@@ -132,12 +132,20 @@ void strrecy(str) + void bigrecy(bgnm) + SCM bgnm; + { ++/* As an emergency patch, only implement this GC optimization on specific ++ * 64-bit platforms. ++ * There is a "use-after-free" bug on 32-bit platforms, introduced as a ++ * regression between 5f1 and 5f2. --bnewbold (2017-09-30) ++ */ ++#if defined(__ia64__) || defined(__powerpc64__) || defined(__x86_64__) \ ++ || defined(__aarch64__) + if (IMP(bgnm) || !BIGP(bgnm)) return; + DEFER_INTS; + must_free(CHARS(bgnm), (sizet)NUMDIGS(bgnm)*sizeof(BIGDIG)); + CAR(bgnm) = INUM0; + CDR(bgnm) = INUM0; + ALLOW_INTS; ++#endif + } + + /* can convert to string accurately with bignums */ -- cgit v1.2.3