a payload member: a tagged value, or an availability slot of one
314def aosPayloadMemberCode =
315 (lambda unrestricted member : (family JSON) .
316 (naturalSelect
317 (aosHas b"t" member)
318 (aosValueCode member)
319 (naturalSelect (aosHas b"state" member) (aosSlotCode member aosValueCode) 10)))The compiler supplied declaration spans and resolved links from this source snapshot. This page does not assert that this file belongs to a checked closure.