USING: arrays kernel sequences sequences.frozen sequences.private tools.test ; { { 1 2 3 } } [ { 1 2 3 } >array ] unit-test [ 1 1 { 1 2 3 } set-nth ] [ immutable? ] must-fail-with { "abc" } [ "abc" dup like ] unit-test