Author: yamakenz
Date: Sun Apr 6 09:35:22 2008
New Revision: 5380
Added:
branches/sigscheme-0.8/test/test-fail.scm
- copied unchanged from r5379, /sigscheme-trunk/test/test-fail.scm
Modified:
branches/sigscheme-0.8/NEWS
branches/sigscheme-0.8/configure.in
branches/sigscheme-0.8/lib/unittest.scm
branches/sigscheme-0.8/make-dist.sh
branches/sigscheme-0.8/src/sigscheme.h
branches/sigscheme-0.8/test/Makefile.am
branches/sigscheme-0.8/test/test-sscm-ext.scm
Log:
* Merge r5378,5379 from trunk
Modified: branches/sigscheme-0.8/NEWS
==============================================================================
--- branches/sigscheme-0.8/NEWS (original)
+++ branches/sigscheme-0.8/NEWS Sun Apr 6 09:35:22 2008
@@ -1,3 +1,17 @@
+Overview of changes from 0.8.1 to 0.8.2
+=======================================
+
+* Specification changes
+
+ - test-report-result exits with error code 70 (EX_SOFTWARE) if some
tests are
+ failed
+
+* Fixes
+
+ - Fix bogus result of 'make check'. 0.8.1 and earlier passes all
tests even
+ if sme tests are failed
+
+
Overview of changes from 0.8.0 to 0.8.1
=======================================
Modified: branches/sigscheme-0.8/configure.in
==============================================================================
--- branches/sigscheme-0.8/configure.in (original)
+++ branches/sigscheme-0.8/configure.in Sun Apr 6 09:35:22 2008
@@ -1,5 +1,5 @@
AC_PREREQ(2.60b)
-AC_INIT([SigScheme], [0.8.1], [EMAIL PROTECTED], [sigscheme])
+AC_INIT([SigScheme], [0.8.2], [EMAIL PROTECTED], [sigscheme])
AC_CONFIG_SRCDIR([src/sigscheme.c])
AC_CONFIG_HEADERS([src/config.h])
AM_INIT_AUTOMAKE([1.10 dist-bzip2])
Modified: branches/sigscheme-0.8/lib/unittest.scm
==============================================================================
--- branches/sigscheme-0.8/lib/unittest.scm (original)
+++ branches/sigscheme-0.8/lib/unittest.scm Sun Apr 6 09:35:22 2008
@@ -53,7 +53,7 @@
(define *total-errors* 0) ;; TODO: recover unintended error and
increment this
(define test-filename "unspecified")
-(define test-report-result
+(define test-display-result
(lambda ()
(let ((header (if (zero? *total-failures*)
"OK: "
@@ -68,6 +68,15 @@
*total-failures* " failures, "
*total-errors* " errors"))
(newline))))
+
+(define test-report-result
+ (lambda ()
+ (test-display-result)
+ (let ((EX_OK 0)
+ (EX_SOFTWARE 70))
+ (exit (if (positive? *total-failures*)
+ EX_SOFTWARE
+ EX_OK)))))
;; Backward compatibility
(define total-report test-report-result)
Modified: branches/sigscheme-0.8/make-dist.sh
==============================================================================
--- branches/sigscheme-0.8/make-dist.sh (original)
+++ branches/sigscheme-0.8/make-dist.sh Sun Apr 6 09:35:22 2008
@@ -5,7 +5,7 @@
UIM_REPOSITORY="http://uim.googlecode.com/svn";
TAGS_REPOSITORY="${UIM_REPOSITORY}/tags"
#SSCM_REPOSITORY="${UIM_REPOSITORY}/sigscheme-trunk"
-SSCM_REPOSITORY="${TAGS_REPOSITORY}/sigscheme-0.8.1"
+SSCM_REPOSITORY="${TAGS_REPOSITORY}/sigscheme-0.8.2"
#LIBGCROOTS_URL="${UIM_REPOSITORY}/libgcroots-trunk"
LIBGCROOTS_URL="${TAGS_REPOSITORY}/libgcroots-0.2.1"
Modified: branches/sigscheme-0.8/src/sigscheme.h
==============================================================================
--- branches/sigscheme-0.8/src/sigscheme.h (original)
+++ branches/sigscheme-0.8/src/sigscheme.h Sun Apr 6 09:35:22 2008
@@ -65,10 +65,10 @@
/*=======================================
Macro Definitions
=======================================*/
-#define SSCM_VERSION_STRING "0.8.1"
+#define SSCM_VERSION_STRING "0.8.2"
#define SSCM_VERSION_MAJOR (0)
#define SSCM_VERSION_MINOR (8)
-#define SSCM_VERSION_PATCHLEVEL (1)
+#define SSCM_VERSION_PATCHLEVEL (2)
#define SSCM_VERSION_REQUIRE(major, minor, patchlevel) \
((major) < SSCM_VERSION_MAJOR
\
|| ((major) == SSCM_VERSION_MAJOR && (minor) < SSCM_VERSION_MINOR)
\
Modified: branches/sigscheme-0.8/test/Makefile.am
==============================================================================
--- branches/sigscheme-0.8/test/Makefile.am (original)
+++ branches/sigscheme-0.8/test/Makefile.am Sun Apr 6 09:35:22 2008
@@ -2,7 +2,7 @@
EXTRA_DIST = unittest-bigloo.scm unittest-gauche.scm \
run-singletest.sh.in
-sscm_xfail_tests =
+sscm_xfail_tests = test-fail.scm
sscm_optional_tests =
# Native tests of SigScheme
sscm_tests = \
@@ -21,6 +21,7 @@
test-eqv.scm \
test-equal.scm \
test-eval.scm \
+ test-fail.scm \
test-formal-syntax.scm \
test-formatplus.scm \
test-lambda.scm \
Modified: branches/sigscheme-0.8/test/test-sscm-ext.scm
==============================================================================
--- branches/sigscheme-0.8/test/test-sscm-ext.scm (original)
+++ branches/sigscheme-0.8/test/test-sscm-ext.scm Sun Apr 6 09:35:22 2008
@@ -43,7 +43,7 @@
(define ud (undef))
(tn "sscm-version")
-(assert-equal? (tn) "0.8.0" (sscm-version))
+(assert-equal? (tn) "0.8.2" (sscm-version))
(tn "%%current-char-codec")
(assert-equal? (tn) "UTF-8" (%%current-char-codec))
