guile: remove support for guile < 2.0

This commit is contained in:
Christopher Lam
2019-10-02 19:55:50 +08:00
parent c59515f7b7
commit 0c65c41b32
4 changed files with 3 additions and 13 deletions

View File

@@ -1,8 +1,6 @@
(debug-enable 'backtrace)
(debug-set! stack 500000)
(if (< (string->number (major-version)) 2)
(debug-set! maxdepth 100000))
(display " testing report module load ... ")
(setenv "GNC_UNINSTALLED" "1")

View File

@@ -32,10 +32,6 @@
(syntax-rules ()
((_ x) x)))
(if (< (string->number (major-version)) 2)
(export-syntax N_))
(export gnc:gettext)
(export _)
(export N_)

View File

@@ -1,5 +1,2 @@
(if (or (string=? (version) "1.3")
(string=? (version) "1.3.4"))
(dynamic-link "libgnc-module.so")
(dynamic-link "libgnc-module"))
(dynamic-link "libgnc-module")
(exit 0)

View File

@@ -21,9 +21,8 @@
;; In guile 2.0 we get nearly 7500 of them loading the scheme files.
;; This is the default value for auto-compilation-options without "unbound-variable".
;; See module/ice-9/boot-9.scm */
(if (>= (string->number (major-version)) 2)
(set! %auto-compilation-options
'(#:warnings (arity-mismatch format duplicate-case-datum bad-case-datum))))
(set! %auto-compilation-options
'(#:warnings (arity-mismatch format duplicate-case-datum bad-case-datum)))
(use-modules (gnucash core-utils))