base64: revert unnecessary syntax change

This commit is contained in:
Isaac Visintainer 2020-02-25 22:30:03 -08:00
parent c502474942
commit 4c2cf0e463

View File

@ -59,8 +59,8 @@
'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/'
::
|^ |= bs=octs ^- cord
=+ ^- [padding=@ blocks=(list word24)]
(octs-to-blocks bs)
=/ [padding=@ blocks=(list word24)]
(octs-to-blocks bs)
(crip (flop (unpad padding (encode-blocks blocks))))
::
++ octs-to-blocks