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 377–380

aosDecodeU64

Full file
377def aosDecodeU64 =
378  (lambda unrestricted value : (family JSON) . (let unrestricted text = (aosMemberBytes b"v" value)
379    in (aosWhen (naturalAnd (aosHasExactly2 b"t" b"v" value) (naturalAnd (aosMemberIsString b"v" value) (aosIsU64Text text)))
380         (constructor AosValue AosU64 (aosDigitsValue 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.