Hi,
Am Sonntag, den 12.11.2006, 15:47 +0100 schrieb Andreas Rottmann:
Hi!
I haven't done a G-Wrap release yet, since G-Wrap HEAD breaks gnucash
with a strange error:
Backtrace:
In unknown file:
?: 49* [save-module-excursion #<procedure #f ()>]
?: 50 (let (# #) (dynamic-wind # thunk #))
?: 51 [dynamic-wind #<procedure #f ()> #<procedure #f ()>
#<procedure #f ()>]
?: 52* [#<procedure #f ()>]
?: 53* [primitive-load
"/usr/share/gnucash/guile-modules/gnucash/report/account-p$
In /usr/share/gnucash/guile-modules/gnucash/report/account-piecharts.scm:
460: 54* [for-each #<procedure #f (l)> (# # # #)]
In unknown file:
?: 55 (if (null? rest) (letrec ((lp #)) (lp list1)) ...)
...
?: 56 (begin (f (car l)) (lp (cdr l)))
?: 57* [#<procedure #f (l)> ("Income Accounts" (income) #t ...)]
In /usr/share/gnucash/guile-modules/gnucash/report/account-piecharts.scm:
462: 58 (let ((tip-and-rev (cddddr l))) (gnc:define-report (quote
version) 1 ...))
In /usr/share/gnucash/scm/report.scm:
...
92: 59 (let ((report-rec #)) (if (and report-rec #) (let* # #) ...))
92: 60* [args-to-defn #f (version 1 name ...)]
81: 61 (let ((report-rec #)) (if (null? args) in-report-rec (let # # #)))
81: 62* (if in-report-rec in-report-rec (blank-report))
83: 63 [blank-report]
65: 64 ((record-constructor <report-template>) #f #f #f #f #f #f
#t #f ...)
65: 65* [rec-constructor #<record-type <report-template>>]
In /usr/share/slib/record.scm:
131: 66* (if (not #) (slib:error # "illegal rtd argument." rtd))
132: 67 [error record-constructor "illegal rtd argument." ...]
In unknown file:
...
?: 68 [scm-error misc-error #f ...]
<unnamed port>: In procedure scm-error in expression (scm-error
(quote misc-error) #f ...):
<unnamed port>: record-constructor "illegal rtd argument."
#<record-type <report-template>>
I'd appreciate any hints, as I have no idea why this happens.
are you sure this is due to g-wrap? This happens on trunk too, see
http://bugzilla.gnome.org/show_bug.cgi?id=373809
http://lists.gnucash.org/pipermail/gnucash-user/2006-November/018142.html
My fix is to add
(use-modules (ice-9 slib))
(require 'record)
to src/report/report-system/html-style-sheet.scm and
src/report/report-system/report.scm
But then I get a weird error about sort, make-array, apply:nconc2last...
i did not understand that one and finally downgraded slib again.
-- andi5
PS: Here it is:
In current input:
1: 0* [gnc:report-menu-setup]
?: 1 (letrec (# # # ...) (gnc-add-scm-extension
income-expense-menu) ...)
In
/home/ak47/Software/GnuCash/installs/Current/share/gnucash/guile-modules/gnucash/report/report-gnome.scm:
120: 2* [gnc:add-report-template-menu-items]
In unknown file:
?: 3 (letrec (# # # ...) (gnc:report-templates-for-each
add-template) ...)
In
/home/ak47/Software/GnuCash/installs/Current/share/gnucash/guile-modules/gnucash/report/report-gnome.scm:
93: 4 [for-each #<procedure #f (item)> ...
96: 5* [sort (# # # # ...) #<procedure sort-templates (a b)>]
In /usr/share/slib/sort.scm:
172: 6 (cond ((array? seq) (let # #)) (#t (sort:sort! # less?)))
In unknown file:
...
?: 7 (letrec ((newra #)) (do (# #) (# newra) (array-set! newra #
i)))
In /usr/share/slib/sort.scm:
174: 8* [apply #<procedure create-array (prot . args)> (# # # # ...)
#f]
In unknown file:
?: 9 [create-array ...
?: 10* [apply:nconc2last ((# # # # ...) #f)]
<unnamed port>: In procedure apply:nconc2last in expression
(apply:nconc2last args):
<unnamed port>: Wrong type argument in position 1: ((("Sample Report
with Examples" . #(#((rtd) "<report-template>" () [... ... ...]
_______________________________________________
gnucash-devel mailing list
address@hidden
https://lists.gnucash.org/mailman/listinfo/gnucash-devel