[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2012-02-16-g14c63c6

Raymond Toy rtoy at common-lisp.net
Fri Feb 17 19:39:35 UTC 2012

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  14c63c68c74e9d0ebe1a21bcb23bad48a4a917a1 (commit)
       via  f6c4baf6d5ec399d0fa556782ae01493911a37f7 (commit)
       via  2adbebc42e0732e50e7c3dfb997c252553c73a9a (commit)
      from  2e958dba7d37b76966146b2b279db7f0a248865d (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 14c63c68c74e9d0ebe1a21bcb23bad48a4a917a1
Merge: f6c4baf 2e958db
Author: Raymond Toy <rtoy at google.com>
Date:   Fri Feb 17 11:38:21 2012 -0800

    Merge branch 'master' of ssh://common-lisp.net/var/git/projects/cmucl/cmucl

commit f6c4baf6d5ec399d0fa556782ae01493911a37f7
Author: Raymond Toy <rtoy at google.com>
Date:   Fri Feb 17 10:44:59 2012 -0800

    Fix compiler warning.

diff --git a/src/lisp/Linux-os.c b/src/lisp/Linux-os.c
index 6c8f10f..8f85101 100644
--- a/src/lisp/Linux-os.c
+++ b/src/lisp/Linux-os.c
@@ -145,7 +145,7 @@ os_init0(const char *argv[], const char *envp[])
     struct utsname name;
-    check_personality(&name, argv, envp);
+    check_personality(&name, (char *const *) argv, (char *const *) envp);

commit 2adbebc42e0732e50e7c3dfb997c252553c73a9a
Author: Raymond Toy <rtoy at google.com>
Date:   Fri Feb 17 10:44:45 2012 -0800

    Remove unused var.

diff --git a/src/lisp/interr.c b/src/lisp/interr.c
index ecdcbc0..57e18f2 100644
--- a/src/lisp/interr.c
+++ b/src/lisp/interr.c
@@ -174,7 +174,6 @@ debug_print(lispobj object)
         if ((unsigned long) lisp_string->header == type_SimpleString) {
             unsigned short int* lisp_chars;
             int len;
-            int k;
             len = lisp_string->length >> 2;
             lisp_chars = (unsigned short int*) lisp_string->data;


Summary of changes:
 src/lisp/Linux-os.c |    2 +-
 src/lisp/interr.c   |    1 -
 2 files changed, 1 insertions(+), 2 deletions(-)

CMU Common Lisp

More information about the cmucl-cvs mailing list