876def integerLiteralFailureTag =
877 (lambda unrestricted failure : (family IntegerLiteralFailure) .
878 (eliminate
879 IntegerLiteralFailure
880 (lambda unrestricted current : (family IntegerLiteralFailure) . Nat)
881 failure
882 (branch IntegerLiteralMissingDigits . (succ zero))
883 (branch IntegerLiteralBadDigit . (succ (succ zero)))
884 (branch IntegerLiteralBadSeparator . (succ (succ (succ zero))))
885 (branch IntegerLiteralOutOfRange . (succ (succ (succ (succ zero)))))))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.