possible bug report

[Derek Atkins]

Is this any different than bug #168250?

-derek

Quoting John Griessen <john_g at cibolo.com>:

> Hello,
> 
> I have a repeatable situation where I can restore a saved-reports-1.8 file,
> and 
> recreate a fnacy printable invoice of the same name and get back to crashing
> 
> when asking for a printable report.
> 
> 
> Interested in me sending more details?
> 
> 
> 
> 
> John Griessen
> 
> Here is saved-reports-1.8:
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;; Options for saved report "Printable Invoice", based on template "Printable
> 
> Invoice"
> (let ()
>   (define (options-gen)
>    (let ((options (gnc:report-template-new-options/name "Printable
> Invoice")))
> 
> ; Section: Display Columns
> 
> 
> ; Section: Display
> 
> 
> ; Section: General
> 
> (let ((option (gnc:lookup-option options
>                                   "General"
>                                   "Invoice Number")))
>    ((lambda (option) (if option ((gnc:option-setter option) 
> '"1fec538f0d11d26b1f446b121d0c3895"))) option))
> 
> (let ((option (gnc:lookup-option options
>                                   "General"
>                                   "Stylesheet")))
>    ((lambda (option) (if option ((gnc:option-setter option) 
> 'project-doneinvoice))) option))
> 
>    options))
>   (gnc:define-report
>    'version 1
>    'name "Printable Invoice"
>    'options-generator options-gen
>    'menu-path (list gnc:menuname-custom)
>    'renderer (gnc:report-template-renderer/name "Printable Invoice")))
> 
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;; Options for saved report "Printable Invoice", based on template "Printable
> 
> Invoice"
> (let ()
>   (define (options-gen)
>    (let ((options (gnc:report-template-new-options/name "Printable
> Invoice")))
> 
> ; Section: Display Columns
> 
> 
> ; Section: Display
> 
> 
> ; Section: General
> 
> (let ((option (gnc:lookup-option options
>                                   "General"
>                                   "Invoice Number")))
>    ((lambda (option) (if option ((gnc:option-setter option) 
> '"1fec538f0d11d26b1f446b121d0c3895"))) option))
> 
> (let ((option (gnc:lookup-option options
>                                   "General"
>                                   "Stylesheet")))
>    ((lambda (option) (if option ((gnc:option-setter option) 
> 'project-doneinvoice))) option))
> 
>    options))
>   (gnc:define-report
>    'version 1
>    'name "Printable Invoice"
>    'options-generator options-gen
>    'menu-path (list gnc:menuname-custom)
>    'renderer (gnc:report-template-renderer/name "Printable Invoice")))
> 
> ============================================
> Here is the crash output when asking for a printable invoice report:
> ============================================
> 
> 
> john at toolbench:~/chronofile-jg-docs$ gnucash project-done.gnucash
> Warning: taxtable_reset_refcount: Fixing refcount on taxtable 
> 2149722e0643a4526f6c5b032d15a4b4 (2 -> 1)
> 
> gnucash: [W] "failure loading 
>
""/home/john/.gnucash/books/%2Fhome%2Fjohn%2Fchronofile-jg-docs%2Fproject-done.gnucash"
> Backtrace:
> In /usr/share/gnucash/scm/report.scm:
>         ...
>   167: 83264  (let ((options #)) (gnc:register-option options stylesheet)
> ...)
>   167: 83265* [options-gen]
> In /home/john/.gnucash/saved-reports-1.8:
>    37: 83266  (let ((options #)) (let (#) (# option)) (let (#) (# option))
> ...)
>    37: 83267* [gnc:report-template-new-options/name "Printable Invoice"]
> In /usr/share/gnucash/scm/report.scm:
>   127: 83268  (let ((templ #)) (if templ (gnc:report-template-new-options
> templ) 
> #f))
> In unknown file:
>         ...
>     ?: 83269  [gnc:report-template-new-options #]
> In /usr/share/gnucash/scm/report.scm:
>   146: 83270  (let (# # #) (if # # #))
>   153: 83271* [gnc:make-multichoice-option "General" "Stylesheet" ... ...
>   157: 83272* [map #<procedure #f (ss)> ...
>   164: 83273* [gnc:get-html-style-sheets]
> In /usr/share/gnucash/scm/html-style-sheet.scm:
>   271: 83274  (let ((ss #)) (hash-for-each (lambda # #) *gnc:_style-sheets_*)
> ...)
>   274: 83275  [sort (# # #) #<procedure #f (a b)>]
> In unknown file:
>     ?: 83276* [#<procedure #f #> # #]
> In /usr/share/gnucash/scm/html-style-sheet.scm:
>   276: 83277* [string<? ...
>   276: 83278* [gnc:html-style-sheet-name #]
> In unknown file:
>     ?: 83279  (and (eq? (quote #) (record-type-descriptor obj)) (struct-ref
> obj 0))
>     ?: 83280* [eq? #<record-type <html-style-sheet>> ...
>     ?: 83281* [record-type-descriptor #]
>     ?: 83282  (if (struct? obj) (struct-vtable obj) (error (quote
> not-a-record) 
> obj))
>     ?: 83283* (struct? obj)
> 
> <unnamed port>: In expression (struct? obj):
> <unnamed port>: Stack overflow
> _______________________________________________
> 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