Chris Dennis wrote: > I've boiled the problem down to this: > > ---- > ;#! /usr/bin/guile > (define fred "This is Fred") > (define (foo bar) > (display fred) (newline) (display bar) (newline) > (display "and now via eval-string...") (newline) > (let ((string1 "(display fred) (newline) (display bar) (newline)")) > (eval-string string1))) > (foo "Actual parameter") > ---- > gives this output: > ---- > This is Fred > Actual parameter > and now via eval-string... > This is Fred > ERROR: Unbound variable: bar > ---- > Here's another approach:
(define fred "This is Fred") (define (foo bar) (display fred) (newline) (display bar) (newline) (display "and now via eval-string...") (newline) (let ((string1 (string-append "(display fred) (newline) (display \"" bar "\") (newline)"))) (eval-string string1))) (foo "Actual parameter") Arthur _______________________________________________ gnucash-devel mailing list gnucash-devel@gnucash.org https://lists.gnucash.org/mailman/listinfo/gnucash-devel