minor byt cleanup

This commit is contained in:
timlucmiptev 2021-02-21 13:03:21 +02:00 committed by ixv
parent 539465c138
commit e8e1731edf

View File

@ -45,14 +45,7 @@
=+ n-take=(sub wid.b n)
[n-take (end [bloq n-take] dat.b)]
--
++ byt
=/ bl ~(. blop 3)
|%
++ cat cat:bl:byt
++ flip flip:bl:byt
++ take take:bl:byt
++ drop drop:bl:byt
--
++ byt ~(. blop 3)
::
++ bit
=/ bl ~(. blop 0)