Accepting request 103900 from devel:languages:misc

Automatic submission by obs-autosubmit

OBS-URL: https://build.opensuse.org/request/show/103900
OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/guile?expand=0&rev=31
This commit is contained in:
Stephan Kulow 2012-02-14 12:06:01 +00:00 committed by Git OBS Bridge
commit deb463f8e6
5 changed files with 34 additions and 22 deletions

View File

@ -1,3 +0,0 @@
version https://git-lfs.github.com/spec/v1
oid sha256:dae8c7dc556b459c3046879c5c5ee7171c5014d3a884cc70fa0055ae85dd16f1
size 5408540

3
guile-2.0.5.tar.bz2 Normal file
View File

@ -0,0 +1,3 @@
version https://git-lfs.github.com/spec/v1
oid sha256:024fc20e8d3b742d23f58e1983a1e3e84667ab3606165c1020be07f5460d8513
size 5485111

View File

@ -1,24 +1,21 @@
See http://debbugs.gnu.org/cgi/bugreport.cgi?bug=10096
why this test is turned off.
Index: guile-2.0.3/test-suite/tests/gc.test
Index: guile-2.0.5/test-suite/tests/gc.test
===================================================================
--- guile-2.0.3.orig/test-suite/tests/gc.test
+++ guile-2.0.3/test-suite/tests/gc.test
@@ -65,23 +65,23 @@
foo)))
--- guile-2.0.5.orig/test-suite/tests/gc.test
+++ guile-2.0.5/test-suite/tests/gc.test
@@ -66,25 +66,25 @@
(remove-hook! after-gc-hook thunk)
foo))
-(with-test-prefix "gc"
- (pass-if "Unused modules are removed"
- (let* ((guard (make-guardian))
- (total 1000))
-
- (for-each (lambda (x) (guard (make-module))) (iota total))
+;;(with-test-prefix "gc"
+;; (pass-if "Unused modules are removed"
+;; (let* ((guard (make-guardian))
+;; (total 1000))
+;;
- (for-each (lambda (x) (guard (make-module))) (iota total))
+;; (for-each (lambda (x) (guard (make-module))) (iota total))
;; Avoid false references to the modules on the stack.
@ -26,20 +23,23 @@ Index: guile-2.0.3/test-suite/tests/gc.test
+;; (stack-cleanup 20)
- (gc)
- (gc) ;; twice: have to kill the weak vectors.
- (gc) ;; thrice: because the test doesn't succeed with only
- (gc) ;; twice: have to kill the weak vectors.
- (gc) ;; thrice: because the test doesn't succeed with only
+;; (gc)
+;; (gc) ;; twice: have to kill the weak vectors.
+;; (gc) ;; thrice: because the test doesn't succeed with only
;; one gc round. not sure why.
+;; (gc) ;; twice: have to kill the weak vectors.
+;; (gc) ;; thrice: because the test doesn't succeed with only
;; one gc round. not sure why.
- (= (let lp ((i 0))
- (if (guard)
- (lp (1+ i))
- i))
- total))))
- total)))
+;; (= (let lp ((i 0))
+;; (if (guard)
+;; (lp (1+ i))
+;; i))
+;; total))))
+;; total)))
(pass-if "Lexical vars are collectable"
(let ((l (compile

View File

@ -1,3 +1,15 @@
-------------------------------------------------------------------
Tue Jan 31 15:10:31 UTC 2012 - pgajdos@suse.com
- update to 2.0.5:
** Better debuggability for interpreted procedures.
** Support for cross-compilation.
** The return of `local-eval'.
** Fluids can now have default values.
** Garbage collector tuning.
*** Unmanaged allocation
* etc. see NEWS
-------------------------------------------------------------------
Wed Jan 18 16:21:57 UTC 2012 - pgajdos@suse.com

View File

@ -32,7 +32,7 @@ BuildRequires: libltdl-devel
BuildRequires: libunistring-devel
BuildRequires: pkg-config
BuildRequires: readline-devel
Version: %{guilevers}.3
Version: %{guilevers}.5
Release: 0
Summary: GNU's Ubiquitous Intelligent Language for Extension
License: GFDL-1.3 and GPL-3.0+ and LGPL-3.0+