[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2012-09-7-g8391b8b

Raymond Toy rtoy at common-lisp.net
Wed Sep 26 16:55:12 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  8391b8b06135973c176df7049f4f9bff3f926c00 (commit)
      from  8d75583bb9d07f2103e49aa5795c1e9604b76a55 (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 8391b8b06135973c176df7049f4f9bff3f926c00
Author: Raymond Toy <toy.raymond at gmail.com>
Date:   Wed Sep 26 09:54:58 2012 -0700

    Fix typo (missing closing paren).

diff --git a/src/compiler/ppc/system.lisp b/src/compiler/ppc/system.lisp
index edeed9a..a807607 100644
--- a/src/compiler/ppc/system.lisp
+++ b/src/compiler/ppc/system.lisp
@@ -291,6 +291,6 @@
 		   (read-cycle-counter)
 		 ;; Can't do anything about the notes about generic
 		 ;; arithmetic, so silence the notes..
-		 (declare (optimize (inhibit-warnings 3))
+		 (declare (optimize (inhibit-warnings 3)))
                  (+ (ash (- ,hi1 ,hi0) 32)
                     (- ,lo1 ,lo0)))))))
diff --git a/src/compiler/sparc/system.lisp b/src/compiler/sparc/system.lisp
index 2ba0b34..dba4b6d 100644
--- a/src/compiler/sparc/system.lisp
+++ b/src/compiler/sparc/system.lisp
@@ -299,6 +299,6 @@ result is the first value."
 		   (read-cycle-counter)
 		 ;; Can't do anything about the notes about generic
 		 ;; arithmetic, so silence the notes..
-		 (declare (optimize (inhibit-warnings 3))
+		 (declare (optimize (inhibit-warnings 3)))
                  (+ (ash (- ,hi1 ,hi0) 32)
                     (- ,lo1 ,lo0)))))))
diff --git a/src/compiler/x86/system.lisp b/src/compiler/x86/system.lisp
index 9207b5b..93519d8 100644
--- a/src/compiler/x86/system.lisp
+++ b/src/compiler/x86/system.lisp
@@ -691,6 +691,6 @@
 		   (read-cycle-counter)
 		 ;; Can't do anything about the notes about generic
 		 ;; arithmetic, so silence the notes..
-		 (declare (optimize (inhibit-warnings 3))
+		 (declare (optimize (inhibit-warnings 3)))
                  (+ (ash (- ,hi1 ,hi0) 32)
                     (- ,lo1 ,lo0)))))))

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

Summary of changes:
 src/compiler/ppc/system.lisp   |    2 +-
 src/compiler/sparc/system.lisp |    2 +-
 src/compiler/x86/system.lisp   |    2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)


hooks/post-receive
-- 
CMU Common Lisp




More information about the cmucl-cvs mailing list