view gcc/config/pa/lib2funcs.asm @ 55:77e2b8dfacca gcc-4.4.5

update it from 4.4.3 to 4.5.0
author ryoma <>
date Fri, 12 Feb 2010 23:39:51 +0900
parents a06113de4d67
line wrap: on
line source

;  Subroutines for calling unbound dynamic functions from within GDB for HPPA.
;  Subroutines for out of line prologues and epilogues on for the HPPA
;  Copyright (C) 1994, 1995, 1996, 2009 Free Software Foundation, Inc.

;  This file is part of GCC.

;  GCC 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 3, or (at your option)
;  any later version.

;  GCC is distributed in the hope that it will be useful,
;  but WITHOUT ANY WARRANTY; without even the implied warranty of
;  GNU General Public License for more details.

;  Under Section 7 of GPL version 3, you are granted additional
;  permissions described in the GCC Runtime Library Exception, version
;  3.1, as published by the Free Software Foundation.

;  You should have received a copy of the GNU General Public License and
;  a copy of the GCC Runtime Library Exception along with this program;
;  see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
;  <>.

#if !defined(__pro__) && !defined(__rtems__)
#if !defined(__pro__) && !defined(__rtems__)

; Simply call with the address of the desired import stub in %r22 and
; arguments in the normal place (%r26-%r23 and stack slots).
	.align 4
	; Our return address comes in %r31, not %r2!
	stw %r31,-8(%r30)

	; An inline version of dyncall so we don't have to worry
	; about long calls to millicode, PIC and other complexities.
	bb,>=,n %r22,30,L$foo
        depi 0,31,2,%r22
        ldw 4(%r22),%r19
        ldw 0(%r22),%r22
        ldsid (%r22),%r1
        mtsp %r1,%sr0
        ble 0(%sr0,%r22)
	copy %r31,%r2
	ldw -8(%r30),%r2

	; We're going to be returning to a stack address, so we
	; need to do an intra-space return.
	ldsid (%rp),%r1
	mtsp %r1,%sr0
	be,n 0(%sr0,%rp)