AlphaGitHub
Source/Packages

Observe.Value

packages/observability/src/Observe/Value.alpha

564 lines114 declarations29.3 KiBSHA-256 09f8c02938ee
Download exact fileView at revision426597bda5753d86c4

def · lines 382–385

aosDecodeI64

Full file
382def aosDecodeI64 =
383  (lambda unrestricted value : (family JSON) . (let unrestricted text = (aosMemberBytes b"v" value)
384    in (aosWhen (naturalAnd (aosHasExactly2 b"t" b"v" value) (naturalAnd (aosMemberIsString b"v" value) (aosIsI64Text text)))
385         (constructor AosValue AosI64 (aosHasMinus text) (aosDigitsValue (aosSignedDigits text))))))

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.