X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fsparc-sunos-os.c;h=6b8364d66de4133fbc3bd4351268a51dc41d6df7;hb=7f0f521aa3f6b45259c5dfd5f7f11adcd1a7cac6;hp=76459f46ce5c3c5dfa3953f8a6f9026a04e7bbfc;hpb=0d669e68a1ffbea42af6216f2ae8c7d7ca12ffb6;p=sbcl.git diff --git a/src/runtime/sparc-sunos-os.c b/src/runtime/sparc-sunos-os.c index 76459f4..6b8364d 100644 --- a/src/runtime/sparc-sunos-os.c +++ b/src/runtime/sparc-sunos-os.c @@ -30,7 +30,6 @@ #include #include -/* #include */ #include #include #include @@ -63,23 +62,23 @@ os_context_register_addr(os_context_t *context, int offset) os_context_register_t * os_context_pc_addr(os_context_t *context) { - return &(context->uc_mcontext.gregs[REG_PC]); + return &(context->uc_mcontext.gregs[REG_PC]); } os_context_register_t * os_context_npc_addr(os_context_t *context) { - return &(context->uc_mcontext.gregs[REG_nPC]); + return &(context->uc_mcontext.gregs[REG_nPC]); } sigset_t * os_context_sigmask_addr(os_context_t *context) { - return &(context->uc_sigmask); + return &(context->uc_sigmask); } void os_flush_icache(os_vm_address_t address, os_vm_size_t length) { - /* FIXME. There's a bit of stuff in the CMUCL version. It may or - may not be needed */ + /* see sparc-assem.S */ + sparc_flush_icache(address, length); }