X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fppc-darwin-os.c;h=46c9ef0ac35e592ae4af4ca90297d9e823260ba2;hb=c8617f57d0413beb2890e94dabe227cef9c5ddad;hp=461ae9fdb2c76c65588a5fbe741953ba6f26fb6e;hpb=02d7495253b9075e4d86275590c3e827c814b596;p=sbcl.git

diff --git a/src/runtime/ppc-darwin-os.c b/src/runtime/ppc-darwin-os.c
index 461ae9f..46c9ef0 100644
--- a/src/runtime/ppc-darwin-os.c
+++ b/src/runtime/ppc-darwin-os.c
@@ -122,6 +122,18 @@ os_context_lr_addr(os_context_t *context)
 }
 
 os_context_register_t *
+os_context_ctr_addr(os_context_t *context)
+{
+    return (os_context_register_t *) &context->uc_mcontext->PPC_DARWIN_REGIFY(ss).PPC_DARWIN_REGIFY(ctr);
+}
+
+os_context_register_t *
+os_context_cr_addr(os_context_t *context)
+{
+    return (os_context_register_t *) &context->uc_mcontext->PPC_DARWIN_REGIFY(ss).PPC_DARWIN_REGIFY(cr);
+}
+
+os_context_register_t *
 os_context_pc_addr(os_context_t *context)
 {
   return &context->uc_mcontext->PPC_DARWIN_REGIFY(ss).PPC_DARWIN_REGIFY(srr0);