urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-19 16:51:42 +03:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #6834 from urbit/develop

Browse Source 
Merge develop into next/kelvin/411
This commit is contained in:
Pyry Kovanen 2023-10-21 18:08:25 +03:00 committed by GitHub
commit 00a7ed05db
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
pkg/arvo/sys/zuse.hoon
View File

@ -4298,8 +4298,11 @@
~&(%base-64-padding-err-two ~) ~&(%base-64-padding-err-two ~)
=/ len (sub (mul 3 (div (add lat dif) 4)) dif) =/ len (sub (mul 3 (div (add lat dif) 4)) dif)
:+ ~ len :+ ~ len
%+ swp 3 =/ res (rsh [1 dif] (rep [0 6] (flop dat)))
(rep [0 6] (flop (weld dat (reap dif 0)))) =/ amt (met 3 res)
:: left shift trailing zeroes in after byte swap
=/ trl ?: (lth len amt) 0 (sub len amt)
(lsh [3 trl] (swp 3 res))
-- --
-- --
:: ::