summaryrefslogtreecommitdiff
path: root/gnu-stabs.h
diff options
context:
space:
mode:
Diffstat (limited to 'gnu-stabs.h')
-rw-r--r--gnu-stabs.h75
1 files changed, 75 insertions, 0 deletions
diff --git a/gnu-stabs.h b/gnu-stabs.h
new file mode 100644
index 0000000000..3cdc91def8
--- /dev/null
+++ b/gnu-stabs.h
@@ -0,0 +1,75 @@
+#error This file is obsolete.
+
+/* Copyright (C) 1991, 1992, 1994 Free Software Foundation, Inc.
+This file is part of the GNU C Library.
+
+The GNU C Library is free software; you can redistribute it and/or
+modify it under the terms of the GNU Library General Public License as
+published by the Free Software Foundation; either version 2 of the
+License, or (at your option) any later version.
+
+The GNU C Library is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+Library General Public License for more details.
+
+You should have received a copy of the GNU Library General Public
+License along with the GNU C Library; see the file COPYING.LIB. If
+not, write to the Free Software Foundation, Inc., 675 Mass Ave,
+Cambridge, MA 02139, USA. */
+
+#ifndef __GNU_STABS_H
+
+#define __GNU_STABS_H 1
+
+#ifdef HAVE_GNU_LD
+
+/* Alias a function:
+ function_alias(creat, _creat, int, (file, mode),
+ DEFUN(creat, (file, mode),
+ CONST char *file AND int mode))
+ Yes, this is very repetitive. Nothing you can do about it, so shut up. */
+#define function_alias(name, _name, type, args, defun) \
+ symbol_alias (_name, name);
+
+#define function_alias_void(name, _name, args, defun) \
+ symbol_alias (_name, name);
+
+#ifdef NO_UNDERSCORES
+#define __SYMBOL_PREFIX
+#else
+#define __SYMBOL_PREFIX "_"
+#endif
+
+/* Make references to ALIAS refer to SYMBOL. */
+#define symbol_alias(symbol, alias) \
+ asm(".stabs \"" __SYMBOL_PREFIX #alias "\",11,0,0,0\n"\
+ ".stabs \"" __SYMBOL_PREFIX #symbol "\",1,0,0,0")
+
+/* Issue a warning message from the linker whenever SYMBOL is referenced. */
+#define warn_references(symbol, msg) \
+ asm(".stabs \"" msg "\",30,0,0,0\n" \
+ ".stabs \"" __SYMBOL_PREFIX #symbol "\",1,0,0,0")
+
+#define stub_warning(name) \
+ warn_references(name, \
+ "warning: " #name " is not implemented and will always fail")
+
+#define text_set_element(set, symbol) \
+ asm(".stabs \"" __SYMBOL_PREFIX #set "\",23,0,0," __SYMBOL_PREFIX #symbol)
+#define data_set_element(set, symbol) \
+ asm(".stabs \"" __SYMBOL_PREFIX #set "\",25,0,0," __SYMBOL_PREFIX #symbol)
+#define bss_set_element(set, symbol) \
+ asm(".stabs \"" __SYMBOL_PREFIX #set "\",27,0,0," __SYMBOL_PREFIX #symbol)
+
+#else /* No GNU stabs. */
+
+#define function_alias(name, _name, type, args, defun) \
+ type defun { return _name args; }
+
+#define function_alias_void(name, _name, args, defun) \
+ void defun { _name args; }
+
+#endif /* GNU stabs. */
+
+#endif /* gnu-stabs.h */