[CM] Scheme S7 convert float to string

[Heinrich Taube]

James, Im not exactly sure what you are trying to do, but you can use S7's object->string

> (object->string 123.45)

"123.45"

S7 also has a version of common lisp's format() :

> (format #f "~f" 123.456)

"123.456000"




On Jan 2, 2014, at 12:46 PM, James Hearon <j_hearon at hotmail.com> wrote:

> Hi,
> I'm a bit stuck on finding info for scheme s7 format conversion from float to string for output to file.  I've tried several things, mostly looking at lisp code, but cannot seem to come up with what it wants.  Any help or hints would be appreciated.
> 
> Thank you.
> 
>  
> (define ouf1 (open-output-file "myfloats.txt")) 
> (define outstring "init") 
>  
> (define (myfloats total) 
> (let ((test 0)) 
>  (process  with mytable = (make-heap '(.5 1 2.5 3))
>       until (= test total) 
>       do 
> (set! outstring (next mytable))   ;***stuck here with format conversion ***
> (set! outstring (string-append outstring (string #\newline)))
> (display outstring ouf1)
> (print (next mytable)) 
> (set! test (+ test 1))   ))) 
>  
> (sprout (myfloats 10) ) 
>  
> (close-output-port ouf1)
> _______________________________________________
> Cmdist mailing list
> Cmdist at ccrma.stanford.edu
> http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist