king: address joe's comments again

This commit is contained in:
pilfer-pandex 2021-01-29 14:14:57 -08:00
parent 2fdc5ad351
commit 1042422bbe
2 changed files with 1 additions and 10 deletions

View File

@ -45,15 +45,6 @@ instance Show Nock where
--------------------------------------------------------------------------------
-- A Pill is a pair of [pil_p pil_q], where pil_p is cued and pil_q is an
-- optional set of userspace ovums.
--
-- The cued pil_p is a trel of [mot tag dat], where mot is 0 (version number?),
-- tag is a cord about the type of pill, and dat is the traditional trel of
-- [pBootForumlas pKernelOvums pUserspaceOvums].
--
-- So what's with pil_q? It looks like it is search for the %into.
data Pill
= PillIvory [Noun]
| PillPill

View File

@ -35,4 +35,4 @@ mum syd fal key = go syd 0
ham = shiftR haz 31 `xor` (haz .&. 0x7fff_ffff)
in if ham /= 0
then ham
else go (syd + 1) (i + 1)
else go (syd + 1) (i + 1)