sys/src/libc/68000/setjmp.s

   1 TEXT    setjmp(SB), 1, $0
   2         MOVL    b+0(FP), A0
   3         MOVL    A7, (A0)+
   4         MOVL    (A7), (A0)
   5         CLRL    R0
   6         RTS
   7
   8 TEXT    longjmp(SB), 1, $0
   9         MOVL    b+0(FP), A0
  10         MOVL    r+4(FP), R0
  11         BNE     ok              /* ansi: "longjmp(0) => longjmp(1)" */
  12         MOVL    $1, R0          /* bless their pointed heads */
  13 ok:     MOVL    (A0)+, A7
  14         MOVL    (A0), (A7)
  15         RTS