dev-scheme/c-wrapper: fix for >=sys-libs/glibc-2.25

Package-Manager: Portage-2.3.40, Repoman-2.3.9

diff --git a/dev-scheme/c-wrapper/c-wrapper-0.6.1-r1.ebuild b/dev-scheme/c-wrapper/c-wrapper-0.6.1-r1.ebuild
index c47ed5ad71e407518301c5648b74e5564043dde6..cd0348a0133adae7819bee218bee185375e7e85f 100644 (file)
--- a/dev-scheme/c-wrapper/c-wrapper-0.6.1-r1.ebuild
+++ b/dev-scheme/c-wrapper/c-wrapper-0.6.1-r1.ebuild
@@ -22,6 +22,7 @@ PATCHES=(
        "${FILESDIR}"/${PN}-closure.patch
        "${FILESDIR}"/${PN}-gcc-5.patch
        "${FILESDIR}"/${PN}-gentoo.patch
+       "${FILESDIR}"/${PN}-glibc-2.25.patch
 )
 HTML_DOCS=( doc/${PN}-ref{e,j}.html )
 

diff --git a/dev-scheme/c-wrapper/files/c-wrapper-glibc-2.25.patch b/dev-scheme/c-wrapper/files/c-wrapper-glibc-2.25.patch
new file mode 100644 (file)
index 0000000..0776b25
--- /dev/null
+++ b/dev-scheme/c-wrapper/files/c-wrapper-glibc-2.25.patch
@@ -0,0 +1,13 @@
+--- a/lib/c-wrapper/c-parser.scm
++++ b/lib/c-wrapper/c-parser.scm
+@@ -1115,7 +1115,9 @@
+                 (raise e))))
+      (call-with-gcc-io include-dirs headers options
+                        (lambda (in out)
+-                         (let ((macro-list (queue->list (macro-queue))))
++                         (let ((macro-list (filter (lambda (m)
++                                                     (not (string-prefix?  "__glibc_macro_warning" (car m))))
++                                                   (queue->list (macro-queue)))))
+                            (for-each (lambda (macro-def)
+                                        (display (car macro-def) out)
+                                        (newline out))