t-vms (LIB2FUNCS_EXTRA): Add vms_tramp.asm.
* config/alpha/t-vms (LIB2FUNCS_EXTRA): Add vms_tramp.asm. * config/alpha/vms_tramp.asm: New file. * config/alpha/vms-tramp.asm: Removed. From-SVN: r47134
This commit is contained in:
parent
7d14c755ce
commit
6f684b5368
@ -1,3 +1,9 @@
|
||||
Sat Nov 17 23:30:44 2001 Douglas B. Rupp <rupp@gnat.com>
|
||||
|
||||
* config/alpha/t-vms (LIB2FUNCS_EXTRA): Add vms_tramp.asm.
|
||||
* config/alpha/vms_tramp.asm: New file.
|
||||
* config/alpha/vms-tramp.asm: Removed.
|
||||
|
||||
2001-11-18 Joseph S. Myers <jsm28@cam.ac.uk>
|
||||
|
||||
* c-common.c (struct disabled_builtin, disabled_builtins,
|
||||
|
@ -1 +1 @@
|
||||
LIB2FUNCS_EXTRA = tramp.s
|
||||
LIB2FUNCS_EXTRA = $(srcdir)/config/alpha/vms_tramp.asm
|
||||
|
@ -1,22 +0,0 @@
|
||||
;# New Alpha OpenVMS trampoline
|
||||
;#
|
||||
.set noreorder
|
||||
.set volatile
|
||||
.set noat
|
||||
.file 1 "tramp.s"
|
||||
.text
|
||||
.align 3
|
||||
.globl __tramp
|
||||
.ent __tramp
|
||||
__tramp..en:
|
||||
|
||||
.link
|
||||
.align 3
|
||||
__tramp:
|
||||
.pdesc __tramp..en,null
|
||||
.text
|
||||
ldq $1,24($27)
|
||||
ldq $27,16($27)
|
||||
ldq $28,8($27)
|
||||
jmp $31,($28),0
|
||||
.end __tramp
|
52
gcc/config/alpha/vms_tramp.asm
Normal file
52
gcc/config/alpha/vms_tramp.asm
Normal file
@ -0,0 +1,52 @@
|
||||
/* VMS trampoline for nested functions
|
||||
Copyright (C) 2001 Free Software Foundation, Inc.
|
||||
Contributed by Douglas B. Rupp (rupp@gnat.com).
|
||||
|
||||
This file is part of GNU CC.
|
||||
|
||||
GNU CC is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2, or (at your option)
|
||||
any later version.
|
||||
|
||||
In addition to the permissions in the GNU General Public License, the
|
||||
Free Software Foundation gives you unlimited permission to link the
|
||||
compiled version of this file into combinations with other programs,
|
||||
and to distribute those combinations without any restriction coming
|
||||
from the use of this file. (The General Public License restrictions
|
||||
do apply in other respects; for example, they cover modification of
|
||||
the file, and distribution when not linked into a combine
|
||||
executable.)
|
||||
|
||||
GNU CC 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 General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with GNU CC; see the file COPYING. If not, write to
|
||||
the Free Software Foundation, 59 Temple Place - Suite 330,
|
||||
Boston, MA 02111-1307, USA. */
|
||||
|
||||
;# Alpha OpenVMS trampoline
|
||||
;#
|
||||
.set noreorder
|
||||
.set volatile
|
||||
.set noat
|
||||
.file 1 "vms_tramp.asm"
|
||||
.text
|
||||
.align 3
|
||||
.globl __tramp
|
||||
.ent __tramp
|
||||
__tramp..en:
|
||||
|
||||
.link
|
||||
.align 3
|
||||
__tramp:
|
||||
.pdesc __tramp..en,null
|
||||
.text
|
||||
ldq $1,24($27)
|
||||
ldq $27,16($27)
|
||||
ldq $28,8($27)
|
||||
jmp $31,($28),0
|
||||
.end __tramp
|
Loading…
Reference in New Issue
Block a user