IG
Size: a a a
IG
VM
[:note/project 1]
.IG
IG
AI
VM
IB
TP
TP
TP
IG
IG
СС
СС
IB
A
IS
AI
IP
next-
IP
(loop [length initial-length
result []]
(let [data (b/read-data codec big-in little-in)
next-length (- length (get data length-key))
next-result (conj result data)]
(if (pos? next-length)
(recur next-length next-result)
next-result)))