OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [newlib/] [newlib/] [libc/] [machine/] [z8k/] [setjmp.S] - Blame information for rev 1774

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 39 lampret 
 
2 
#ifdef __Z8001__
3 
        segm
4 
 
5 
        .global _setjmp
6 
_setjmp:
7 
        ldl     rr2,@rr14       ! fetch pc
8 
        ldl     @rr6,rr2        ! save it
9 
        ldl     rr6(4),rr10
10 
        ldl     rr6(8),rr12     ! and the other special regs
11 
        ldl     rr6(12),rr14
12 
        ldk     r2,#0
13 
        ret     t
14 
 
15 
        .globl  _longjmp
16 
 
17 
_longjmp:
18 
        ld      r2,r5           ! get return value
19 
        ldl     rr4,rr6(0)
20 
        ldl     rr10,rr6(4)
21 
        ldl     rr12,rr6(8)
22 
        ldl     rr14,rr6(12)
23 
        jp      @rr4
24 
#else
25 
        unseg
26 
 
27 
        .global _setjmp
28 
_setjmp:
29 
        ld      r2,@r15 ! fetch pc
30 
        ld      @r7,r2  ! save it
31 
        ldl     r7(4),rr10
32 
        ldl     r7(8),rr12      ! and the other special regs
33 
        ldl     r7(12),rr14
34 
        ldk     r2,#0
35 
        ret     t
36 
 
37 
        .globl  _longjmp
38 
 
39 
_longjmp:
40 
        ld      r2,r6           ! get return value
41 
        ld      r4,@r7
42 
        ldl     rr10,rr7(4)
43 
        ldl     rr12,rr7(8)
44 
        ldl     rr14,rr7(12)
45 
        jp      @rr4
46 
 
47 
#endif
48 
 
49 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.