TEXT    setjmp(SB), 1, $0
       MOVL    b+0(FP), A0
       MOVL    A7, (A0)+
       MOVL    (A7), (A0)
       CLRL    R0
       RTS

TEXT    longjmp(SB), 1, $0
       MOVL    b+0(FP), A0
       MOVL    r+4(FP), R0
       BNE     ok              /* ansi: "longjmp(0) => longjmp(1)" */
       MOVL    $1, R0          /* bless their pointed heads */
ok:     MOVL    (A0)+, A7
       MOVL    (A0), (A7)
       RTS

You are viewing proxied material from sdf.org. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.