forked from xuos/xiuos
69 lines
1.5 KiB
ArmAsm
69 lines
1.5 KiB
ArmAsm
/* Copyright JS Foundation and other contributors, http://js.foundation
|
|
*
|
|
* Licensed under the Apache License, Version 2.0 (the "License");
|
|
* you may not use this file except in compliance with the License.
|
|
* You may obtain a copy of the License at
|
|
*
|
|
* http://www.apache.org/licenses/LICENSE-2.0
|
|
*
|
|
* Unless required by applicable law or agreed to in writing, software
|
|
* distributed under the License is distributed on an "AS IS" BASIS
|
|
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
* See the License for the specific language governing permissions and
|
|
* limitations under the License.
|
|
*/
|
|
|
|
.syntax unified
|
|
|
|
.macro func _name
|
|
.global \_name
|
|
.type \_name, %function
|
|
\_name:
|
|
.endm
|
|
.macro endfunc _name
|
|
.size \_name, .-\_name
|
|
.endm
|
|
|
|
/**
|
|
* setjmp (jmp_buf env)
|
|
*
|
|
* See also:
|
|
* longjmp
|
|
*
|
|
* @return 0 - if returns from direct call,
|
|
* nonzero - if returns after longjmp.
|
|
*/
|
|
func setjmp
|
|
stmdb sp!, {r4 - r11, lr}
|
|
mov r2, sp
|
|
add r0, r0, #4
|
|
str r2, [r0]
|
|
add r0, r0, #4
|
|
vstm r0!, {s16 - s31}
|
|
mov r0, #0
|
|
ldmia sp!, {r4 - r11, pc}
|
|
endfunc setjmp
|
|
|
|
/**
|
|
* longjmp (jmp_buf env, int val)
|
|
*
|
|
* Note:
|
|
* if val is not 0, then it would be returned from setjmp,
|
|
* otherwise - 0 would be returned.
|
|
*
|
|
* See also:
|
|
* setjmp
|
|
*/
|
|
func longjmp
|
|
ldmia r0!, {r4 - r11, lr}
|
|
ldr sp, [r0]
|
|
add r0, r0, #4
|
|
vldm r0, {s16 - s31}
|
|
mov r0, r1
|
|
cmp r0, #0
|
|
beq 1f
|
|
mov r0, #1
|
|
1:
|
|
ldmia sp!, {r4 - r11, pc}
|
|
endfunc longjmp
|