diff options
| author | Joseph Hunkeler <jhunkeler@gmail.com> | 2015-07-08 20:46:52 -0400 |
|---|---|---|
| committer | Joseph Hunkeler <jhunkeler@gmail.com> | 2015-07-08 20:46:52 -0400 |
| commit | fa080de7afc95aa1c19a6e6fc0e0708ced2eadc4 (patch) | |
| tree | bdda434976bc09c864f2e4fa6f16ba1952b1e555 /unix/as.rs6000/zsvjmp.s | |
| download | iraf-linux-fa080de7afc95aa1c19a6e6fc0e0708ced2eadc4.tar.gz | |
Initial commit
Diffstat (limited to 'unix/as.rs6000/zsvjmp.s')
| -rw-r--r-- | unix/as.rs6000/zsvjmp.s | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/unix/as.rs6000/zsvjmp.s b/unix/as.rs6000/zsvjmp.s new file mode 100644 index 00000000..38740322 --- /dev/null +++ b/unix/as.rs6000/zsvjmp.s @@ -0,0 +1,29 @@ + .toc + .extern setjmp[DS] + .extern .setjmp +.csect [PR] + .align 2 + .globl zsvjmp + .globl .zsvjmp + .csect zsvjmp[DS] +zsvjmp: + .long .zsvjmp, TOC[tc0], 0 + .csect [PR] +.zsvjmp: + st 4, 0(3) + cal 0, 0(0) + st 0, 0(4) + ai 3, 3, 4 + b .setjmp + cror 15,15,15 +LT..zsvjmp: + .long 0 + .byte 0,0,32,97,128,1,2,1 + .long 0 + .long LT..zsvjmp-.zsvjmp + .short 6 + .byte "zsvjmp" + .byte 31 +_section_.text: +.csect .data[RW] + .long _section_.text |