2002-10-07 Joel Sherrill <joel@OARcorp.com>
* libc/machine/hppa/DEFS.h, libc/machine/hppa/pcc_prefix.s, libc/machine/hppa/setjmp.S, libc/machine/hppa/DEFS.h: Make this compile with current GNU tools.
This commit is contained in:
parent
3c66c0707c
commit
54ec52e4a4
|
@ -1,3 +1,9 @@
|
||||||
|
2002-10-07 Joel Sherrill <joel@OARcorp.com>
|
||||||
|
|
||||||
|
* libc/machine/hppa/DEFS.h, libc/machine/hppa/pcc_prefix.s,
|
||||||
|
libc/machine/hppa/setjmp.S, libc/machine/hppa/DEFS.h: Make this
|
||||||
|
compile with current GNU tools.
|
||||||
|
|
||||||
2002-10-07 Jeff Johnston <jjohnstn@redhat.com>
|
2002-10-07 Jeff Johnston <jjohnstn@redhat.com>
|
||||||
|
|
||||||
* Makefile.am: Add EXTRA_DIRS to allow future dependencies on
|
* Makefile.am: Add EXTRA_DIRS to allow future dependencies on
|
||||||
|
|
|
@ -24,6 +24,29 @@
|
||||||
#define EXIT(Name) BLANK M_EXIT (Name,PROF_/**/Name)
|
#define EXIT(Name) BLANK M_EXIT (Name,PROF_/**/Name)
|
||||||
#define EXITC(Name) BLANK M_EXITC (Name,PROF_/**/Name)
|
#define EXITC(Name) BLANK M_EXITC (Name,PROF_/**/Name)
|
||||||
|
|
||||||
|
#if 0
|
||||||
|
#define TEXT_SEGMENT \
|
||||||
|
.SPACE $TEXT$ !\
|
||||||
|
.SUBSPA $CODE$
|
||||||
|
#define RO_SEGMENT \
|
||||||
|
.SPACE $TEXT$ !\
|
||||||
|
.SUBSPA $lit$
|
||||||
|
#define DATA_SEGMENT \
|
||||||
|
.SPACE $PRIVATE$ !\
|
||||||
|
.SUBSPA $data$
|
||||||
|
#define BSS_SEGMENT \
|
||||||
|
.SPACE $PRIVATE$ !\
|
||||||
|
.SUBSPA $bss$
|
||||||
|
#else
|
||||||
|
#define TEXT_SEGMENT .text
|
||||||
|
#define RO_SEGMENT .rodata
|
||||||
|
#define DATA_SEGMENT .data
|
||||||
|
#define BSS_SEGMENT .bss
|
||||||
|
#endif
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
#ifdef PROF
|
#ifdef PROF
|
||||||
|
|
||||||
;
|
;
|
||||||
|
@ -36,8 +59,7 @@
|
||||||
; profile data).
|
; profile data).
|
||||||
;
|
;
|
||||||
#define M_ENTRY(name,prof) \
|
#define M_ENTRY(name,prof) \
|
||||||
.SPACE $TEXT$ !\
|
TEXT_SEGMENT !\
|
||||||
.SUBSPA $CODE$ !\
|
|
||||||
.label name !\
|
.label name !\
|
||||||
.PROC !\
|
.PROC !\
|
||||||
.CALLINFO CALLER,SAVE_RP !\
|
.CALLINFO CALLER,SAVE_RP !\
|
||||||
|
@ -63,8 +85,7 @@
|
||||||
|
|
||||||
|
|
||||||
#define M_ENTRYC(name,prof) \
|
#define M_ENTRYC(name,prof) \
|
||||||
.SPACE $TEXT$ !\
|
TEXT_SEGMENT !\
|
||||||
.SUBSPA $CODE$ !\
|
|
||||||
.label name !\
|
.label name !\
|
||||||
.PROC !\
|
.PROC !\
|
||||||
.CALLINFO CALLER,SAVE_RP !\
|
.CALLINFO CALLER,SAVE_RP !\
|
||||||
|
@ -97,8 +118,7 @@
|
||||||
.EXIT !\
|
.EXIT !\
|
||||||
.PROCEND !\
|
.PROCEND !\
|
||||||
.EXPORT name,ENTRY !\
|
.EXPORT name,ENTRY !\
|
||||||
.SPACE $PRIVATE$ !\
|
DATA_SEGMENT !\
|
||||||
.SUBSPA $DATA$ !\
|
|
||||||
.label prof !\
|
.label prof !\
|
||||||
.WORD 0 !\
|
.WORD 0 !\
|
||||||
.IMPORT $global$,DATA !\
|
.IMPORT $global$,DATA !\
|
||||||
|
@ -110,8 +130,7 @@
|
||||||
.EXIT !\
|
.EXIT !\
|
||||||
.PROCEND !\
|
.PROCEND !\
|
||||||
.EXPORT name,ENTRY !\
|
.EXPORT name,ENTRY !\
|
||||||
.SPACE $PRIVATE$ !\
|
DATA_SEGMENT !\
|
||||||
.SUBSPA $DATA$ !\
|
|
||||||
.label prof !\
|
.label prof !\
|
||||||
.WORD 0 !\
|
.WORD 0 !\
|
||||||
.IMPORT $global$,DATA !\
|
.IMPORT $global$,DATA !\
|
||||||
|
@ -120,16 +139,14 @@
|
||||||
#else /* NOT profiling */
|
#else /* NOT profiling */
|
||||||
|
|
||||||
#define M_ENTRY(name,prof) \
|
#define M_ENTRY(name,prof) \
|
||||||
.SPACE $TEXT$ !\
|
TEXT_SEGMENT !\
|
||||||
.SUBSPA $CODE$ !\
|
|
||||||
.label name !\
|
.label name !\
|
||||||
.PROC !\
|
.PROC !\
|
||||||
.CALLINFO !\
|
.CALLINFO !\
|
||||||
.ENTRY
|
.ENTRY
|
||||||
|
|
||||||
#define M_ENTRYC(name,prof) \
|
#define M_ENTRYC(name,prof) \
|
||||||
.SPACE $TEXT$ !\
|
TEXT_SEGMENT !\
|
||||||
.SUBSPA $CODE$ !\
|
|
||||||
.label name !\
|
.label name !\
|
||||||
.PROC !\
|
.PROC !\
|
||||||
.CALLINFO CALLER,SAVE_RP !\
|
.CALLINFO CALLER,SAVE_RP !\
|
||||||
|
@ -158,3 +175,4 @@
|
||||||
|
|
||||||
|
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
|
|
|
@ -334,6 +334,7 @@ sarg: .equ sr1 ; argument
|
||||||
; Software Architecture Pseudo Registers
|
; Software Architecture Pseudo Registers
|
||||||
previous_sp: .equ 64 ; old stack pointer (locates previous frame)
|
previous_sp: .equ 64 ; old stack pointer (locates previous frame)
|
||||||
|
|
||||||
|
#if 0
|
||||||
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
||||||
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
||||||
; Standard space and subspace definitions. version A.08.06
|
; Standard space and subspace definitions. version A.08.06
|
||||||
|
@ -385,5 +386,8 @@ previous_sp: .equ 64 ; old stack pointer (locates previous frame)
|
||||||
; message to be brought in from libgloss/hp-milli.s
|
; message to be brought in from libgloss/hp-milli.s
|
||||||
.space $PRIVATE$
|
.space $PRIVATE$
|
||||||
.subspa $DATA$
|
.subspa $DATA$
|
||||||
|
#else
|
||||||
|
.data
|
||||||
|
#endif
|
||||||
.import ___hp_free_copyright,data
|
.import ___hp_free_copyright,data
|
||||||
L$copyright .word ___hp_free_copyright
|
L$copyright .word ___hp_free_copyright
|
||||||
|
|
|
@ -18,6 +18,9 @@
|
||||||
library. Maybe we'll have to have -msoft-float trigger something
|
library. Maybe we'll have to have -msoft-float trigger something
|
||||||
like -DSOFT_FLOAT if this issue ever arises. */
|
like -DSOFT_FLOAT if this issue ever arises. */
|
||||||
|
|
||||||
|
#include "DEFS.h"
|
||||||
|
|
||||||
|
#if 0
|
||||||
.SPACE $PRIVATE$
|
.SPACE $PRIVATE$
|
||||||
.SUBSPA $DATA$,QUAD=1,ALIGN=8,ACCESS=31
|
.SUBSPA $DATA$,QUAD=1,ALIGN=8,ACCESS=31
|
||||||
.SUBSPA $BSS$,QUAD=1,ALIGN=8,ACCESS=31,ZERO,SORT=82
|
.SUBSPA $BSS$,QUAD=1,ALIGN=8,ACCESS=31,ZERO,SORT=82
|
||||||
|
@ -27,8 +30,8 @@
|
||||||
.IMPORT $global$,DATA
|
.IMPORT $global$,DATA
|
||||||
.IMPORT $$dyncall,MILLICODE
|
.IMPORT $$dyncall,MILLICODE
|
||||||
; gcc_compiled.:
|
; gcc_compiled.:
|
||||||
.SPACE $TEXT$
|
#endif
|
||||||
.SUBSPA $CODE$
|
TEXT_SEGMENT
|
||||||
|
|
||||||
.align 4
|
.align 4
|
||||||
.EXPORT setjmp,ENTRY,PRIV_LEV=3,ARGW0=GR,RTNVAL=GR
|
.EXPORT setjmp,ENTRY,PRIV_LEV=3,ARGW0=GR,RTNVAL=GR
|
||||||
|
|
Loading…
Reference in New Issue