This is an automated email from the git hooks/post-receive script.
mike121 pushed a commit to branch main
in repository guile.
The following commit(s) were added to refs/heads/main by this push:
new b572f187a version.test: incorrect test logic
b572f187a is described below
commit b572f187afaa2dddc6d0a70b16461a2f506a9511
Author: Michael Gran <spk...@yahoo.com>
AuthorDate: Sat Mar 22 05:33:49 2025 -0700
version.test: incorrect test logic
Since string-contains returns an integer on success, this test
was reporting unresolved instead of pass on success.
* test-suite/tests/version.test ("version reporting works"): fix
boolean check logic
---
test-suite/tests/version.test | 10 +++++-----
1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/test-suite/tests/version.test b/test-suite/tests/version.test
index 7ea358d4e..43beac3fc 100644
--- a/test-suite/tests/version.test
+++ b/test-suite/tests/version.test
@@ -1,7 +1,7 @@
;;;; version.test --- test suite for Guile's version functions -*- scheme -*-
;;;; Greg J. Badros <g...@cs.washington.edu>
;;;;
-;;;; Copyright (C) 2000,2001,2006,2010,2020 Free Software Foundation, Inc.
+;;;; Copyright (C) 2000,2001,2006,2010,2020,2025 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
@@ -26,7 +26,7 @@
(and (string? (major-version))
(string? (minor-version))
(string? (micro-version))
- (string-contains (version)
- (string-append (major-version) "."
- (minor-version) "."
- (micro-version))))))
+ (equal? 0 (string-contains (version)
+ (string-append (major-version) "."
+ (minor-version) "."
+ (micro-version)))))))
