1993-06-26 03:30:24 +00:00
|
|
|
#define N_GSYM 128
|
|
|
|
|
#define N_LSYM 129
|
1993-06-28 15:03:27 +00:00
|
|
|
|
|
|
|
|
/* If we try to use .stabx for common blocks, the AIX assembler (bogusly)
|
|
|
|
|
complains about the lack of a colon in the stabstring. */
|
|
|
|
|
#define BEGIN_COMMON(name) .bc name
|
|
|
|
|
#define END_COMMON(name) .ec
|
1993-05-21 01:31:26 +00:00
|
|
|
|
|
|
|
|
#define VAR(name) \
|
|
|
|
|
.globl name; \
|
|
|
|
|
.align 1; \
|
|
|
|
|
name:; \
|
1993-05-21 16:40:05 +00:00
|
|
|
.long 42;
|
|
|
|
|
#define STAB(string,type,value) .stabx string,value,type,0
|
|
|
|
|
|
|
|
|
|
/* Put everything in this csect, which seems to make things work.
|
|
|
|
|
The compiler actually puts the stabs in .csect [PR], but that didn't
|
|
|
|
|
work here (I guess because there is no text section). */
|
|
|
|
|
.csect .data[RW]
|
1993-09-15 22:17:29 +00:00
|
|
|
#include "weird.def"
|
1993-06-28 14:34:46 +00:00
|
|
|
|
|
|
|
|
/* Stuff with backslashes needs to go here, since the aix assembler treats
|
|
|
|
|
them differently. */
|
|
|
|
|
|
|
|
|
|
STAB("sym92:\ !#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[]^_`abcdefghijklmnopqrstuvwxyz{|}~",N_LSYM,0)
|
|
|
|
|
STAB("type92:t92=\ !#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[]^_`abcdefghijklmnopqrstuvwxyz{|}~",N_LSYM,0)
|
|
|
|
|
STAB("attr92:G392=@\ !#$%&'()*+,-./0123456789:<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[]^_`abcdefghijklmnopqrstuvwxyz{|}~;1",N_GSYM, 0)
|
