From 25e4efc2b7d788b6f0b61ea0a523d8cc6e572004 Mon Sep 17 00:00:00 2001 From: Christopher Lam Date: Wed, 28 Oct 2020 21:42:31 +0800 Subject: [PATCH] [core-utils.scm][API] gnc:string-locale? locale-sensitive string-sorting functions -- currently mirrors guile's (ice-9 i18n) functions -- may be modified to call C code if guile code is not reliable. --- bindings/guile/core-utils.scm | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/bindings/guile/core-utils.scm b/bindings/guile/core-utils.scm index 32179f1493..c08643cf11 100644 --- a/bindings/guile/core-utils.scm +++ b/bindings/guile/core-utils.scm @@ -28,12 +28,15 @@ #:export (N_ G_ C_ + gnc:string-locale? gnc:version)) ;; Guile 2 needs to find the symbols from the extension at compile time already (eval-when (compile load eval expand) (load-extension "libgnucash-guile" "gnc_guile_bindings_init")) (use-modules (sw_core_utils)) +(use-modules (ice-9 i18n)) ;; Export the swig-wrapped symbols in the public interface of this module (module-use! (module-public-interface (current-module)) @@ -54,3 +57,6 @@ (define-public (_ x) (issue-deprecation-warning "Using _ to call gettext is disallowed in guile-3 and will be removed in the future. Use G_ instead.") (gnc:gettext x)))) + +(define gnc:string-locale? string-locale>?)