Pardon my naivete, but I'm having trouble with (join (args)) in that I'm expecting to get a string out of it, but it fails when items in the args are non-string.
For example
Code: Select all
(define (tracer)
(begin
(set 'str (join (args)))
(append-file "trace.log" str)
(print str)
)
)
(tracer 1 0.2 "do" " " "not")
Code: Select all
ERR: string expected : 1
called from user defined function tracer
Kind regards,
Bruce.