AlphaGitHub
Source/Packages

Compiler.Elaborator

packages/compiler/src/Compiler/Elaborator.alpha

1,138 lines65 declarations36.4 KiBSHA-256 71619035ff76
Download exact fileView at revisionf5034773ad4bb52133

def · lines 489–496

chooseByteLessApplication

Full file
489def chooseByteLessApplication =
490  (lambda unrestricted spelling : Bytes .
491    (lambda unrestricted argument : (family ClosedNaturalElaboration) .
492      (selectPrimitiveBySpelling
493        spelling
494        byteLessThanSpelling
495        (beginByteComparison (succ zero) argument)
496        (chooseNaturalLessApplication spelling argument))))

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.