diff --git a/pitfall/xenomorph/test/array-test.rkt b/pitfall/xenomorph/test/array-test.rkt
index ce5e4760..c2cde6cc 100644
--- a/pitfall/xenomorph/test/array-test.rkt
+++ b/pitfall/xenomorph/test/array-test.rkt
@@ -1,6 +1,5 @@
 #lang reader (submod "racket.rkt" reader)
 
-
 #|
 approximates
 https://github.com/mbutterick/restructure/blob/master/test/Array.coffee
@@ -9,161 +8,81 @@ https://github.com/mbutterick/restructure/blob/master/test/Array.coffee
 ;describe 'Array', ->
 ;  describe 'decode', ->
 ;    it 'should decode fixed length', ->
-;      stream = new DecodeStream new Buffer [1, 2, 3, 4, 5]
-;      array = new ArrayT uint8, 4
-;      array.decode(stream).should.deep.equal [1, 2, 3, 4]
-
 (parameterize ([current-input-port (open-input-bytes (bytes 1 2 3 4 5))])
   (check-equal? (decode (+ArrayT uint8 4)) '(1 2 3 4)))
 
 
 ;    it 'should decode fixed amount of bytes', ->
-;      stream = new DecodeStream new Buffer [1, 2, 3, 4, 5]
-;      array = new ArrayT uint16, 4, 'bytes'
-;      array.decode(stream).should.deep.equal [258, 772]
-
 (parameterize ([current-input-port (open-input-bytes (bytes 1 2 3 4 5))])
   (check-equal? (decode (+ArrayT uint16be 4 'bytes)) '(258 772)))
 
 
 ;    it 'should decode length from parent key', ->
-;      stream = new DecodeStream new Buffer [1, 2, 3, 4, 5]
-;      array = new ArrayT uint8, 'len'
-;      array.decode(stream, len: 4).should.deep.equal [1, 2, 3, 4]
-;
-
 (parameterize ([current-input-port (open-input-bytes (bytes 1 2 3 4 5))])
-  (check-equal? (decode (+ArrayT uint8 4 'len) #:parent (mhash 'len 4)) '(1 2 3 4)))
+  (check-equal? (decode (+ArrayT uint8 'len) #:parent (mhash 'len 4)) '(1 2 3 4)))
 
 
 ;    it 'should decode amount of bytes from parent key', ->
-;      stream = new DecodeStream new Buffer [1, 2, 3, 4, 5]
-;      array = new ArrayT uint16, 'len', 'bytes'
-;      array.decode(stream, len: 4).should.deep.equal [258, 772]
-
 (parameterize ([current-input-port (open-input-bytes (bytes 1 2 3 4 5))])
   (check-equal? (decode (+ArrayT uint16be 'len 'bytes) #:parent (mhash 'len 4)) '(258 772)))
 
 
 ;    it 'should decode length as number before array', ->
-;      stream = new DecodeStream new Buffer [4, 1, 2, 3, 4, 5]
-;      array = new ArrayT uint8, uint8
-;      array.decode(stream).should.deep.equal [1, 2, 3, 4]
-
 (parameterize ([current-input-port (open-input-bytes (bytes 4 1 2 3 4 5))])
   (check-equal? (decode (+ArrayT uint8 uint8)) '(1 2 3 4)))
 
 
 ;    it 'should decode amount of bytes as number before array', ->
-;      stream = new DecodeStream new Buffer [4, 1, 2, 3, 4, 5]
-;      array = new ArrayT uint16, uint8, 'bytes'
-;      array.decode(stream).should.deep.equal [258, 772]
-
 (parameterize ([current-input-port (open-input-bytes (bytes 4 1 2 3 4 5))])
   (check-equal? (decode (+ArrayT uint16be uint8 'bytes)) '(258 772)))
 
 
 ;    it 'should decode length from function', ->
-;      stream = new DecodeStream new Buffer [1, 2, 3, 4, 5]
-;      array = new ArrayT uint8, -> 4
-;      array.decode(stream).should.deep.equal [1, 2, 3, 4]
-
 (parameterize ([current-input-port (open-input-bytes (bytes 1 2 3 4 5))])
   (check-equal? (decode (+ArrayT uint8 (λ _ 4))) '(1 2 3 4)))
 
 
 ;    it 'should decode amount of bytes from function', ->
-;      stream = new DecodeStream new Buffer [1, 2, 3, 4, 5]
-;      array = new ArrayT uint16, (-> 4), 'bytes'
-;      array.decode(stream).should.deep.equal [258, 772]
-
 (parameterize ([current-input-port (open-input-bytes (bytes 1 2 3 4 5))])
   (check-equal? (decode (+ArrayT uint16be (λ _ 4) 'bytes)) '(258 772)))
 
 
 ;    it 'should decode to the end of the parent if no length is given', ->
-;      stream = new DecodeStream new Buffer [1, 2, 3, 4, 5]
-;      array = new ArrayT uint8
-;      array.decode(stream, _length: 4, _startOffset: 0).should.deep.equal [1, 2, 3, 4]
-
 (parameterize ([current-input-port (open-input-bytes (bytes 1 2 3 4 5))])
   (check-equal? (decode (+ArrayT uint8) #:parent (mhash '_length 4 '_startOffset 0)) '(1 2 3 4)))
 
 
 ; decode to the end of the stream if parent exists, but its length is 0
-
 (parameterize ([current-input-port (open-input-bytes (bytes 1 2 3 4 5))])
   (check-equal? (decode (+ArrayT uint8) #:parent (mhash '_length 0 '_startOffset 0)) '(1 2 3 4 5)))
 
 
 ;    it 'should decode to the end of the stream if no parent and length is given', ->
-;      stream = new DecodeStream new Buffer [1, 2, 3, 4]
-;      array = new ArrayT uint8
-;      array.decode(stream).should.deep.equal [1, 2, 3, 4]
-
 (parameterize ([current-input-port (open-input-bytes (bytes 1 2 3 4))])
   (check-equal? (decode (+ArrayT uint8)) '(1 2 3 4 )))
 
 
 ;  describe 'size', ->
 ;    it 'should use array length', ->
-;      array = new ArrayT uint8, 10
-;      array.size([1, 2, 3, 4]).should.equal 4
-
 (check-equal? (size (+ArrayT uint8 10) '(1 2 3 4)) 4)
 
 
 ;    it 'should add size of length field before string', ->
-;      array = new ArrayT uint8, uint8
-;      array.size([1, 2, 3, 4]).should.equal 5
-;      
-
 (check-equal? (size (+ArrayT uint8 uint8) '(1 2 3 4)) 5)
 
 
 ;    it 'should use defined length if no value given', ->
-;      array = new ArrayT uint8, 10
-;      array.size().should.equal 10
-
 (check-equal? (size (+ArrayT uint8 10)) 10)
 
 
 ;  describe 'encode', ->
 ;    it 'should encode using array length', (done) ->
-;      stream = new EncodeStream
-;      stream.pipe concat (buf) ->
-;        buf.should.deep.equal new Buffer [1, 2, 3, 4]
-;        done()
-;
-;      array = new ArrayT uint8, 10
-;      array.encode(stream, [1, 2, 3, 4])
-;      stream.end()
-
 (check-equal? (encode (+ArrayT uint8 10) '(1 2 3 4) #f) (bytes 1 2 3 4))
 
 
-;
 ;    it 'should encode length as number before array', (done) ->
-;      stream = new EncodeStream
-;      stream.pipe concat (buf) ->
-;        buf.should.deep.equal new Buffer [4, 1, 2, 3, 4]
-;        done()
-;
-;      array = new ArrayT uint8, uint8
-;      array.encode(stream, [1, 2, 3, 4])
-;      stream.end()
-
 (check-equal? (encode (+ArrayT uint8 uint8) '(1 2 3 4) #f) (bytes 4 1 2 3 4))
 
 
 ;    it 'should add pointers after array if length is encoded at start', (done) ->
-;      stream = new EncodeStream
-;      stream.pipe concat (buf) ->
-;        buf.should.deep.equal new Buffer [4, 5, 6, 7, 8, 1, 2, 3, 4]
-;        done()
-;
-;      array = new ArrayT new Pointer(uint8, uint8), uint8
-;      array.encode(stream, [1, 2, 3, 4])
-;      stream.end()
-
 (check-equal? (encode (+ArrayT (+Pointer uint8 uint8) uint8) '(1 2 3 4) #f) (bytes 4 5 6 7 8 1 2 3 4))
\ No newline at end of file