PTO-BLOCK-MODEL-FAULTS-ROLLBACK

1// PTO-UNIT: {"id":"PTO-BLOCK-MODEL-FAULTS-ROLLBACK","surface":"block","classification":["model","faults","rollback"],"depends_on":["PTO-BLOCK-MODEL-DISPATCH-DESTINATION-SHAPE"]}2func RollBackBundleTileDestinations()3begin4    for binding = 0 to PTO_BUNDLE_TILE_BINDING_COUNT - 1 do5        if _BundleTileBindings[[binding]].valid &&6           _BundleTileBindings[[binding]].destination_allocated_by_bundle &&7           !_BundleTileBindings[[binding]].destination_reused_by_generation then8            ReleaseTile(_BundleTileBindings[[binding]].destination);9            _BundleTileBindings[[binding]].destination =10                UInt(_BundleTileBindings[[binding]].destination_hand)11                    as TileIndex;12            _BundleTileBindings[[binding]].destination_allocated_by_bundle =13                FALSE;14        end;15    end;16    let ring = CurrentACR();17    if _LastFault != Fault_None && _TrapContexts[[ring]].valid then18        // Memory faults save the block before the caller can release a19        // speculative destination.  Recovery must observe the same rolled20        // back binding state as live execution, because Tile allocation state21        // itself is not part of the portable trap context.22        _TrapContexts[[ring]].bundle_tile_bindings = _BundleTileBindings;23        _TrapContexts[[ring]].bundle_range_group = _BundleRangeGroup;24    end;25end;26