[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2012-01-13-gbaacae3

[Raymond Toy]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "CMU Common Lisp".

The branch, master has been updated
       via  baacae3ab460cede766d18a3bb95e774997ddd60 (commit)
      from  e3fa809d2333ca1789f81b1d1d8f450db310741e (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit baacae3ab460cede766d18a3bb95e774997ddd60
Author: Raymond Toy <toy.raymond at gmail.com>
Date:   Fri Jan 27 20:20:32 2012 -0700

    Fix up casts to get rid of some compiler warnings.

diff --git a/src/lisp/ppc-arch.c b/src/lisp/ppc-arch.c
index a7267fc..bda9499 100644
--- a/src/lisp/ppc-arch.c
+++ b/src/lisp/ppc-arch.c
@@ -125,7 +125,7 @@ static sigset_t orig_sigmask;
 void
 arch_do_displaced_inst(os_context_t * scp, unsigned long orig_inst)
 {
-    unsigned int *pc = (unsigned long *) SC_PC(scp);
+    unsigned int *pc = (unsigned int *) SC_PC(scp);
 
     orig_sigmask = scp->uc_sigmask;
     sigemptyset(&scp->uc_sigmask);
@@ -135,7 +135,7 @@ arch_do_displaced_inst(os_context_t * scp, unsigned long orig_inst)
     *pc = orig_inst;
     os_flush_icache((os_vm_address_t) pc, sizeof(unsigned int));
 
-    skipped_break_addr = pc;
+    skipped_break_addr = (unsigned long) pc;
 
     /*
      * Replace the next instruction with a 

-----------------------------------------------------------------------

Summary of changes:
 src/lisp/ppc-arch.c |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)


hooks/post-receive
-- 
CMU Common Lisp