[CM] cm 3.6.0 betas available

[Heinrich Taube]

Your example does not contain the necessary backquote ` char (you use  
a quote '  which will not work)

this is the corrected example you send

(define p5p (make-cycle `(120 130 140 150 ,(make-cycle '(1 2 3) :for  
1))))

(next p5p 30)

=> (120 130 140 150 1 120 130 140 150 2 120 130 140 150 3 120 130 140  
150 1 120 130 140 150 2 120 130 140 150 3)

If you dont have the backquote char ` on windows you can use the  
actual name of he macro (quasiquote)

(define p5p (make-cycle (quasiquote (120 130 140 150 ,(make-cycle '(1  
2 3) :for 1)))))




On Apr 19, 2010, at 10:44 PM, Adam wrote:

> Thanks, Ric.
>
>> BUT i think you really want:
>>
>> (define p7 (make-cycle `(300 320 340 ,(make-cycle '(200 220 240
>> 240) :for 1))))
>> => (300 320 340 200 300 320 340 220 300 320 340 240 300 320 340 240
>> 300 320 340 200)
>
> Yes - thats the one.
>
> Unfortunately that example doesn't work on my Grace 3.6.0
> [svn 1875]  S7 Scheme 1.51.,  on MS-Win.
>
> (define p5p (make-cycle '(120 130 140 150 ,(make-cycle '(1 2 3) :for  
> 1))))
> p5p
>
> (next p5p)
> =>
> 120  130  150  170  (unquote (make-cycle (quote (1 2 3) :for 1))   
> 120 130  150
> 170 (unquote (make-cycle (quote (1 2 3) :for 1))  120 130  etc . .
>
>
> _______________________________________________
> Cmdist mailing list
> Cmdist at ccrma.stanford.edu
> http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist