mirror of
https://github.com/Gnucash/gnucash.git
synced 2024-12-01 13:09:41 -06:00
[c-interface] internal defines must be declared first
An internal (define) cannot be after a statement such as (issue-deprecation-warning). This rule was strict in guile-2.2 but relaxed in guile-3.0, hence, the mixed results in CI.
This commit is contained in:
parent
bf671d4fc7
commit
0510ecfe85
@ -88,9 +88,9 @@
|
||||
;; strings. Strings that are returned by the lookup function are
|
||||
;; translated with gettext.
|
||||
(define (gnc:make-string-database)
|
||||
(define string-hash (make-hash-table))
|
||||
(issue-deprecation-warning "gnc:make-string-database is deprecated. It \
|
||||
will be removed in GnuCash 5.x")
|
||||
(define string-hash (make-hash-table))
|
||||
(lambda args
|
||||
(match args
|
||||
(('lookup key) (G_ (hash-ref string-hash key)))
|
||||
|
Loading…
Reference in New Issue
Block a user