call.s

来自「嵌入式操作系统T-Kernel 完整代码」· S 代码 · 共 45 行

/*
 *----------------------------------------------------------------------
 *    T-Kernel
 *
 *    Copyright (C) 2004 by Ken Sakamura. All rights reserved.
 *    T-Kernel is distributed under the T-License.
 *----------------------------------------------------------------------
 *
 *    Version:   1.01.00
 *    Released by T-Engine Forum(http://www.t-engine.org) at 2004/6/28.
 *
 *----------------------------------------------------------------------
 */

/*
 *	@(#)call.S (libtk/VR4131)
 *
 *	Call function corresponds to gp
 */
#define	_in_asm_source_

#include <machine.h>
#include <tk/asm.h>

/*
 * Call function 
 *	INT _CallKernelFunc( INT p1, INT p2, FP func, VP gp )
 */
	.text
	.balign	4
	.globl	Csym(_CallKernelFunc)
	.type	Csym(_CallKernelFunc), %function
Csym(_CallKernelFunc):
	subu	$sp, $sp, 6*8
	sd	$gp, 4*8($sp)
	sd	$ra, 5*8($sp)

	move	$gp, $a3
	jalr	$a2

	ld	$gp, 4*8($sp)
	ld	$ra, 5*8($sp)
	addu	$sp, $sp, 6*8
	jr	$ra