Update preset.
[bertos.git] / bertos / emul / switch_ppc.S
1 /**
2  * \file
3  * <!--
4  * This file is part of BeRTOS.
5  *
6  * Bertos is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
19  *
20  * As a special exception, you may use this file as part of a free software
21  * library without restriction.  Specifically, if other files instantiate
22  * templates or use macros or inline functions from this file, or you compile
23  * this file and link it with other files to produce an executable, this
24  * file does not by itself cause the resulting executable to be covered by
25  * the GNU General Public License.  This exception does not however
26  * invalidate any other reasons why the executable file might be covered by
27  * the GNU General Public License.
28  *
29  * Copyright 2008 Bernie Innocenti <bernie@codewiz.org>
30  * -->
31  *
32  * \author Bernie Innocenti <bernie@codewiz.org>
33  *
34  * \brief PowerPC context switch
35  */
36
37 #ifdef __APPLE__
38     //This workaround is necessary to compile under OS X assembler.
39     #define SWITCH_CONTEXT _asm_switch_context
40 #else
41     #define SWITCH_CONTEXT asm_switch_context
42 #endif
43
44 .balign 4
45
46 /* void asm_switch_context(void ** new_sp, void ** save_sp) */
47 /*                                 r3              r4       */
48 .globl SWITCH_CONTEXT
49 SWITCH_CONTEXT:
50         mflr    0               /* r0 = lr */
51         stw     0,8(1)          /* store lr at *(sp+8) */
52         stw     1,0(4)          /* *save_sp = sp */
53         lwz     1,0(3)          /* sp = *new_sp */
54         lwz     0,8(1)          /* retrieve lr from *(sp+8) */
55         mtlr    0               /* lr = r0 */
56         blr                     /* return */