forked from xuos/xiuos
				
			
		
			
				
	
	
		
			66 lines
		
	
	
		
			1.4 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
			
		
		
	
	
			66 lines
		
	
	
		
			1.4 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
 | 
						|
  stmia r0!, {r4 - r11, lr}
 | 
						|
  str sp, [r0], #4
 | 
						|
  vstm r0, {s16 - s31}
 | 
						|
  mov r0, #0
 | 
						|
  bx lr
 | 
						|
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
 | 
						|
  bne 1f
 | 
						|
  mov r0, #1
 | 
						|
  1:
 | 
						|
  bx lr
 | 
						|
endfunc longjmp
 |