summaryrefslogtreecommitdiff
path: root/build-aux
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2008-08-21 22:23:59 +0200
committerLudovic Courtès <ludo@gnu.org>2008-08-21 22:23:59 +0200
commit103dc4d4d297ed7522e36415869f60d81f9cbc5a (patch)
treefae864e72562f841ed95f3e5f36cc12b2de807c6 /build-aux
parent417566ebc9dc51fc65b490a96213059e17994dde (diff)
downloadguile-103dc4d4d297ed7522e36415869f60d81f9cbc5a.tar.gz
Add Gnulib-provided files for convenience.
These come from Gnulib's Git commit ae3a0d62f26d8156b403e40d6007475006f3136f, dated 2008-08-19.
Diffstat (limited to 'build-aux')
-rw-r--r--build-aux/link-warning.h28
1 files changed, 28 insertions, 0 deletions
diff --git a/build-aux/link-warning.h b/build-aux/link-warning.h
new file mode 100644
index 000000000..fda01941a
--- /dev/null
+++ b/build-aux/link-warning.h
@@ -0,0 +1,28 @@
+/* GL_LINK_WARNING("literal string") arranges to emit the literal string as
+ a linker warning on most glibc systems.
+ We use a linker warning rather than a preprocessor warning, because
+ #warning cannot be used inside macros. */
+#ifndef GL_LINK_WARNING
+ /* This works on platforms with GNU ld and ELF object format.
+ Testing __GLIBC__ is sufficient for asserting that GNU ld is in use.
+ Testing __ELF__ guarantees the ELF object format.
+ Testing __GNUC__ is necessary for the compound expression syntax. */
+# if defined __GLIBC__ && defined __ELF__ && defined __GNUC__
+# define GL_LINK_WARNING(message) \
+ GL_LINK_WARNING1 (__FILE__, __LINE__, message)
+# define GL_LINK_WARNING1(file, line, message) \
+ GL_LINK_WARNING2 (file, line, message) /* macroexpand file and line */
+# define GL_LINK_WARNING2(file, line, message) \
+ GL_LINK_WARNING3 (file ":" #line ": warning: " message)
+# define GL_LINK_WARNING3(message) \
+ ({ static const char warning[sizeof (message)] \
+ __attribute__ ((__unused__, \
+ __section__ (".gnu.warning"), \
+ __aligned__ (1))) \
+ = message "\n"; \
+ (void)0; \
+ })
+# else
+# define GL_LINK_WARNING(message) ((void) 0)
+# endif
+#endif