summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--configure.ac2
-rw-r--r--guix.scm2
-rw-r--r--vikalpa.scm5
3 files changed, 6 insertions, 3 deletions
diff --git a/configure.ac b/configure.ac
index b9ba959..20e5422 100644
--- a/configure.ac
+++ b/configure.ac
@@ -1,4 +1,4 @@
-AC_INIT([vikalpa], [0.2.1])
+AC_INIT([vikalpa], [0.2.2])
AC_CONFIG_SRCDIR([vikalpa.scm])
AC_CONFIG_AUX_DIR([build-aux])
AM_INIT_AUTOMAKE([-Wall -Werror foreign])
diff --git a/guix.scm b/guix.scm
index 9270da1..a888f66 100644
--- a/guix.scm
+++ b/guix.scm
@@ -29,7 +29,7 @@
(define guile-vikalpa
(package
(name "guile-vikalpa")
- (version "0.2.1")
+ (version "0.2.2")
(source (string-append (getcwd) "/vikalpa-" version ".tar.gz"))
(build-system gnu-build-system)
(native-inputs
diff --git a/vikalpa.scm b/vikalpa.scm
index 8f6b02a..e220641 100644
--- a/vikalpa.scm
+++ b/vikalpa.scm
@@ -46,6 +46,7 @@
#:use-module (ice-9 control)
#:use-module (ice-9 exceptions)
#:use-module (ice-9 regex)
+ #:use-module (ice-9 pretty-print)
#:use-module ((srfi srfi-1)
#:select (every any lset-union fold append-map find
filter-map))
@@ -1179,7 +1180,9 @@
expr
...
(current-system)))
- (system-check (name))))))
+ (let ((result (system-check (name))))
+ (unless (null? result)
+ (pretty-print result)))))))
(define (validate-function-name desc name)
(define (err)