45def modelWord64ArithmeticErrorCodeBytes =
46 (lambda unrestricted code : (family ModelWord64ArithmeticErrorCode) .
47 (eliminate
48 ModelWord64ArithmeticErrorCode
49 (lambda unrestricted current : (family ModelWord64ArithmeticErrorCode) . Bytes)
50 code
51 (branch ModelWord64AdditionOverflow . b"ALPHA-MODEL-W64-001")
52 (branch ModelWord64SubtractionUnderflow . b"ALPHA-MODEL-W64-002")))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.