Why I haven't released yet

[Derek Atkins]

Yeah, I'm pretty sure the problem here is slib, not g-wrap.
slib-3a3 is known to work.  Version 3a2 is known to be broken.
Version 3a4 appears to have problems.

-derek

Quoting Andreas Köhler <andi5.py at gmx.net>:

> 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
> gnucash-devel at gnucash.org
> https://lists.gnucash.org/mailman/listinfo/gnucash-devel
>



-- 
       Derek Atkins, SB '93 MIT EE, SM '95 MIT Media Laboratory
       Member, MIT Student Information Processing Board  (SIPB)
       URL: http://web.mit.edu/warlord/    PP-ASEL-IA     N1NWH
       warlord at MIT.EDU                        PGP key available