This should have gone back to the list so Andrew can see it.
-derek
Quoting Eildert Groeneveld <[EMAIL PROTECTED]>:
Derek
not much luck I am afraid. patch make make install all wentrthrough nicely.
But this is the result:
Anything else I could do?
greetings
Eildert
;;; WARNING (wrong arguments for gnc:make-gnc-monetary: #f #<<gnc-numeric>
num: -736000 denom: 100>)
In
/usr/local/share/gnucash/guile-modules/gnucash/report/advanced-portfolio.scm:
...
186: 51 (let* (# # # # ...) (if price-is-dirty #) (for-each # #) ...)
315: 52* (if (or include-empty (not #)) (let* (# # # ...) (if # #) ...) ...)
316: 53 (let* (# # # #) (if # #) (if show-symbol #) ...)
316: 54* [gnc:monetary-neg ...
317: 55* [gnc:sum-collector-commodity #<procedure #f #> # #<procedure #f #>]
In /usr/local/share/gnucash/scm/commodity-utilities.scm:
885: 56 (cond ((and foreign exchange-fn) (let (#) (foreign # # ...) ...))
(#t #f))
886: 57 (let ((balance #)) (foreign (quote format) (lambda # #) ...) ...)
887: 58* [#<procedure #f #> format #<procedure #f #> #f]
In /usr/local/share/gnucash/scm/report-utilities.scm:
448: 59 (case action ((quote add) (add-commodity-value commodity
amount)) ...)
...
414: 60 [map #<procedure #f (pair)> ((#f #<procedure #f (action amount)>))]
In unknown file:
?: 61* [#<procedure #f (pair)> (#f #<procedure #f (action amount)>)]
In /usr/local/share/gnucash/scm/report-utilities.scm:
415: 62* [#<procedure #f (curr val)> #f #<<gnc-numeric> num: -736000 denom:
100>]
In /usr/local/share/gnucash/scm/commodity-utilities.scm:
890: 63 (if (gnc:commodity-equiv? domestic curr) (balance #
domestic ...) ...)
892: 64 [#<procedure #f #> add # ...
893: 65* [gnc:gnc-monetary-amount #f]
In unknown file:
?: 66 (and (eq? (quote #) (record-type-descriptor obj)) (struct-ref obj
1))
?: 67* [eq? #<record-type <gnc-monetary>> ...
?: 68* [record-type-descriptor #f]
?: 69 (if (struct? obj) (struct-vtable obj) (error (quote not-a-record)
obj))
...
?: 70 [scm-error misc-error #f "~A ~S" (not-a-record #f) #f]
<unnamed port>: In procedure scm-error in expression (scm-error (quote
misc-error) #f ...):
<unnamed port>: not-a-record #f
Thanks!
-derek
Quoting Eildert Groeneveld <[EMAIL PROTECTED]>:
> Andrew
>
> just wondering: did the patch make it into svn?
>
> cause if it did it did not solve my problem:
>
>
>
>
> ;;; WARNING (wrong arguments for gnc:make-gnc-monetary: #f
> #<<gnc-numeric> num: -736000 denom: 100>)
> In
> /usr/local/share/gnucash/guile-modules/gnucash/report/advanced-portfolio.
>scm: ...
> 184: 51 (let* (# # # # ...) (for-each # #) (moneyincoll # dividendcoll
> #f) ...)
> 275: 52* (if (or include-empty #) (let # # ...) ...)
> 276: 53 (let (# # # #) (total-value # # #) (total-moneyin # moneyincoll
> #f) ...)
> 276: 54* [gnc:monetary-neg ...
> 277: 55* [gnc:sum-collector-commodity #<procedure #f #> # #<procedure #f
> #>] In /usr/local/share/gnucash/scm/commodity-utilities.scm:
> 885: 56 (cond ((and foreign exchange-fn) (let (#) (foreign # # ...)
> ...)) (#t #f))
> 886: 57 (let ((balance #)) (foreign (quote format) (lambda # #) ...)
> ...) 887: 58* [#<procedure #f #> format #<procedure #f #> #f]
> In /usr/local/share/gnucash/scm/report-utilities.scm:
> 448: 59 (case action ((quote add) (add-commodity-value commodity
> amount)) ...)
> ...
> 414: 60 [map #<procedure #f (pair)> ((#f #<procedure #f (action
> amount)>))] In unknown file:
> ?: 61* [#<procedure #f (pair)> (#f #<procedure #f (action amount)>)]
> In /usr/local/share/gnucash/scm/report-utilities.scm:
> 415: 62* [#<procedure #f (curr val)> #f #<<gnc-numeric> num: -736000
> denom: 100>]
> In /usr/local/share/gnucash/scm/commodity-utilities.scm:
> 890: 63 (if (gnc:commodity-equiv? domestic curr) (balance #
> domestic ...) ...)
> 892: 64 [#<procedure #f #> add # ...
> 893: 65* [gnc:gnc-monetary-amount #f]
> In unknown file:
> ?: 66 (and (eq? (quote #) (record-type-descriptor obj)) (struct-ref
> obj 1))
> ?: 67* [eq? #<record-type <gnc-monetary>> ...
> ?: 68* [record-type-descriptor #f]
> ?: 69 (if (struct? obj) (struct-vtable obj) (error (quote
> not-a-record) obj))
> ...
> ?: 70 [scm-error misc-error #f "~A ~S" (not-a-record #f) #f]
> <unnamed port>: In procedure scm-error in expression (scm-error (quote
> misc-error) #f ...):
> <unnamed port>: not-a-record #f
--
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
[EMAIL PROTECTED] PGP key available
_______________________________________________
gnucash-devel mailing list
gnucash-devel@gnucash.org
https://lists.gnucash.org/mailman/listinfo/gnucash-devel