1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
| Quintiq file version 2.0
| #parent: #root
| Method CleanupSnapshots
| {
| Description:
| [*
| Will auto delete snapshots if the run has more than `LibOpt_Optimizer.MaxNrOfSnapshotsPerRun`.
| Starts with oldest leaf snapshot and goes backup the chain
| *]
| TextBody:
| [*
| // benlong Mar-8-2022 (created)
| if( this.IsAutoCleanupSnapshots() and this.Snapshot( relsize ) > this.Optimizer().MaxNrOfSnapshotsPerRun() )
| {
| nr_to_delete := this.Snapshot( relsize ) - this.Optimizer().MaxNrOfSnapshotsPerRun();
| this.RecursiveDeleteSnapshots( this.FirstSnapshot(), nr_to_delete );
| }
| *]
| }
|
|