1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-22 19:44:10 +02:00

version.h has SCM_EFFECTIVE_VERSION; effective-version uses that

* libguile/version.c (scm_effective_version): Use SCM_EFFECTIVE_VERSION.
* libguile/version.h.in (SCM_EFFECTIVE_VERSION): Define from
  GUILE_EFFECTIVE_VERSION.

* libguile/Makefile.am (version.h): Subst in GUILE_EFFECTIVE_VERSION.

* test-suite/tests/version.test ("version reporting works"): The
  effective version is not necessarily MAJOR.MINOR. Remove check.
This commit is contained in:
Andy Wingo 2010-03-16 20:58:24 +01:00
parent 462bcfd038
commit 89607fab50
4 changed files with 8 additions and 16 deletions

View file

@ -1,7 +1,7 @@
;;;; versions.test --- test suite for Guile's version functions -*- scheme -*-
;;;; Greg J. Badros <gjb@cs.washington.edu>
;;;;
;;;; Copyright (C) 2000, 2001, 2006 Free Software Foundation, Inc.
;;;; Copyright (C) 2000, 2001, 2006, 2010 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,4 @@
(string=? (version)
(string-append (major-version) "."
(minor-version) "."
(micro-version)))
(string=? (effective-version)
(string-append (major-version) "."
(minor-version)))))
(micro-version)))))