[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[PATCH] gash compat: Define EXIT_SUCCESS, EXIT_FAILURE for guile-2.0.12.
From: |
Jan (janneke) Nieuwenhuizen |
Subject: |
[PATCH] gash compat: Define EXIT_SUCCESS, EXIT_FAILURE for guile-2.0.12. |
Date: |
Mon, 28 Dec 2020 09:06:44 +0100 |
This fixes Guix build on ARM, which has %bootstrap-guile 2.0.11.
* gash/compat.scm (EXIT_SUCCESS, EXIT_FAILURE): Define for guile
version below 2 0 12.
---
gash/compat.scm | 11 +++++++----
1 file changed, 7 insertions(+), 4 deletions(-)
diff --git a/gash/compat.scm b/gash/compat.scm
index e98c7df5..337f3f6e 100644
--- a/gash/compat.scm
+++ b/gash/compat.scm
@@ -1,5 +1,6 @@
;;; Gash -- Guile As SHell
;;; Copyright © 2019 Timothy Sample <samplet@ngyro.com>
+;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen.
;;;
;;; This file is part of Gash.
;;;
@@ -54,13 +55,15 @@
(if-guile-version-below (2 0 10)
(begin
- (define-public EXIT_SUCCESS 0)
-
- (define-public EXIT_FAILURE 1)
-
(define-public (exact-integer? x)
(and (integer? x) (exact? x)))))
+(if-guile-version-below (2 0 12)
+ (begin
+ (define-public EXIT_SUCCESS 0)
+
+ (define-public EXIT_FAILURE 1)))
+
(if-guile-version-below (2 2 0)
(begin
(define* (setvbuf port mode #:optional size)
--
Jan Nieuwenhuizen <janneke@gnu.org> | GNU LilyPond http://lilypond.org
Freelance IT http://JoyofSource.com | Avatar® http://AvatarAcademy.com
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [PATCH] gash compat: Define EXIT_SUCCESS, EXIT_FAILURE for guile-2.0.12.,
Jan (janneke) Nieuwenhuizen <=