/* *---------------------------------------------------------------------- *    T-Kernel * *    Copyright (C) 2004-2006 by Ken Sakamura. All rights reserved. *    T-Kernel is distributed under the T-License. *---------------------------------------------------------------------- * *    Version:   1.02.02 *    Released by T-Engine Forum(http://www.t-engine.org) at 2006/8/9. * *---------------------------------------------------------------------- *//* *	T-Kernel SVC interface library (mc9328) * *	   created from /usr/local/te/include/tk/syscall.h */#include <machine.h>#include <tk/sysdef.h>#include <sys/svc/tkfncd.h>	.text	.balign	4	.globl	Csym(tk_get_cpr)	.type	Csym(tk_get_cpr), %functionCsym(tk_get_cpr):	stmfd	sp!, {r4}	add	r4, sp, #4	stmfd	sp!, {lr}	ldr	ip, =TFN_GET_CPR	swi	SWI_SVC	ldmfd	sp!, {lr}	ldmfd	sp!, {r4}	bx	lr