[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.3-133-g9d608
From: |
Ludovic Courtès |
Subject: |
[Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.3-133-g9d608ed |
Date: |
Mon, 09 Jan 2012 22:25:32 +0000 |
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 "GNU Guile".
http://git.savannah.gnu.org/cgit/guile.git/commit/?id=9d608ede96b67ad8f5a3bbab1837bdf0ee39ed0a
The branch, stable-2.0 has been updated
via 9d608ede96b67ad8f5a3bbab1837bdf0ee39ed0a (commit)
from 211e71a18480309904f672bd8fb943a94f447c7c (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 9d608ede96b67ad8f5a3bbab1837bdf0ee39ed0a
Author: Ludovic Courtès <address@hidden>
Date: Mon Jan 9 23:25:02 2012 +0100
Have `cpu-word-size' error out on unknown CPUs; add support for MIPSEL.
* module/system/base/target.scm (cpu-word-size): Add support for
`mipsel'. Call `error' when CPU is unknown.
-----------------------------------------------------------------------
Summary of changes:
module/system/base/target.scm | 6 +++---
1 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/module/system/base/target.scm b/module/system/base/target.scm
index a81b3d9..304056d 100644
--- a/module/system/base/target.scm
+++ b/module/system/base/target.scm
@@ -1,6 +1,6 @@
;;; Compilation targets
-;; Copyright (C) 2011 Free Software Foundation, Inc.
+;; Copyright (C) 2011, 2012 Free Software Foundation, Inc.
;; This library is free software; you can redistribute it and/or
;; modify it under the terms of the GNU Lesser General Public
@@ -82,9 +82,9 @@
(cond ((string-match "^i[0-9]86$" cpu) 4)
((string-match "64$" cpu) 8)
((string-match "64[lbe][lbe]$" cpu) 8)
- ((member cpu '("sparc" "powerpc" "mips")) 4)
+ ((member cpu '("sparc" "powerpc" "mips" "mipsel")) 4)
((string-match "^arm.*" cpu) 4)
- (else "unknown CPU word size" cpu))))
+ (else (error "unknown CPU word size" cpu)))))
(define (triplet-cpu t)
(substring t 0 (string-index t #\-)))
hooks/post-receive
--
GNU Guile
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.3-133-g9d608ed,
Ludovic Courtès <=