path: root/tests/arr4.bth

(say
	(let (A (append! [1 2 3 (let (x 2) (* x x)) 5] 6))
		(let (B (append! A 7)) (append! B 8))
		(append! (append! A 9) 10)))