mirror of
https://github.com/gentoo-mirror/gentoo.git
synced 2025-12-21 21:17:37 -08:00
14 lines
727 B
Diff
14 lines
727 B
Diff
--- 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))
|