#include <libunwind.h>
#include <setjmp.h>
#include "jmpbuf.h"

//#define import_spp
//#include <iraf.h>
#define XINT long
#define XPOINTER long

int zsvjmp_( XPOINTER *buf, XINT *status )
{
    *status = 0;
    ((XINT **)buf)[0] = status;
    jmp_buf *env = (jmp_buf *)((XINT **)buf+1);
    void **wp = (void **) *env;
    wp[JB_SP] = __builtin_frame_address (0);
    wp[JB_RP] = (void *) __builtin_return_address (0);
    return 0;
}