556def checkpointAlignUp64 =
557 (lambda unrestricted value : (family ModelWord64) .
558 (eliminate
559 CheckpointWord64Result
560 (lambda unrestricted current : (family CheckpointWord64Result) .
561 (family CheckpointWord64Result))
562 (checkpointAddChecked
563 (constructor CheckpointErrorCode CheckpointLearnerAlignmentOverflow)
564 value
565 checkpointWord64SixtyThree)
566 (branch
567 CheckpointWord64Succeeded
568 rounded
569 .
570 (constructor
571 CheckpointWord64Result
572 CheckpointWord64Succeeded
573 (modelWord64And rounded checkpointWord64AlignmentMask)))
574 (branch
575 CheckpointWord64Failed
576 code
577 .
578 (constructor CheckpointWord64Result CheckpointWord64Failed code))))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.