X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fsparc-sunos-os.h;h=b1dc334a228a6cd27e9d41ca87719b59dcf2f9e9;hb=4603ca100a7d181fe4316429365fc725501336dd;hp=4f099acf55b4dd8efa52174a2ad1527702272b10;hpb=503a50f07740b52908f630b0492cf56556f1a792;p=sbcl.git diff --git a/src/runtime/sparc-sunos-os.h b/src/runtime/sparc-sunos-os.h index 4f099ac..b1dc334 100644 --- a/src/runtime/sparc-sunos-os.h +++ b/src/runtime/sparc-sunos-os.h @@ -3,7 +3,8 @@ typedef ucontext_t os_context_t; -static inline os_context_t *arch_os_get_context(void **void_context) { +static inline os_context_t *arch_os_get_context(void **void_context) +{ asm volatile ("ta 0x03"); /* ta ST_FLUSH_WINDOWS */ return (os_context_t *) (*void_context); }