bug#17825: broken set! in iteration

2014-06-21 Thread Mark H Weaver
Mark H Weaver writes: > tags 17825 notabug > close 17825 > thanks > > Alírio Eyng writes: > >> I can't see why the second code doesn't work like the first: >> >> (use-modules (srfi srfi-1)) >> (define D '(((3 4 >> (let ((r 1)) >>(set! D (append D '(( >>(display D)(newline

bug#17825: broken set! in iteration

2014-06-21 Thread Mark H Weaver
tags 17825 notabug close 17825 thanks Alírio Eyng writes: > I can't see why the second code doesn't work like the first: > > (use-modules (srfi srfi-1)) > (define D '(((3 4 > (let ((r 1)) >(set! D (append D '(( >(display D)(newline) >(set-car! (drop D r) (car (dro

bug#17825: broken set! in iteration

2014-06-20 Thread Alírio Eyng
I can't see why the second code doesn't work like the first: (use-modules (srfi srfi-1)) (define D '(((3 4 (let ((r 1)) (set! D (append D '(( (display D)(newline) (set-car! (drop D r) (car (drop D (- r 1) (let ((r 2)) (set! D (append D '(( (displa