LayoutControl.cm
Louis Monier June 10, 1986 0:03:30 am PDT
Bertrand Serlet October 2, 1986 10:40:51 pm PDT
DA.cm
Install PadFrame
run -a EU2UtilsImpl
run -a EU2ArithImpl
run -a EU2LeafUtilsImpl
run -a EU2ControlAlpsImpl
run -a EU2RamImpl
run -a EU2RegsImpl
run -a EU2FUImpl
run -a EU2ALUImpl
run -a EU2ControlAlpsImpl
run -a EU2InnerImpl
run -a EU2Impl
← EU2Utils.useControlCheckpoint ← FALSE
← EU2Utils.useRamControlCheckpoint ← TRUE
← EU2Utils.useDPControlCheckpoint ← TRUE
← EU2Utils.useInnerCheckpoint ← FALSE
← EU2Utils.useDataPathCheckpoint ← TRUE
Statistics on
← CedarProcess.SetPriority[background]
← &memory ← SafeStorage.NWordsAllocated[] - SafeStorage.NWordsReclaimed[]
← &ct ← EU2ControlAlps.CreateControl[]
← &ob ← PWCore.Layout[&ct]
← &newmemory ← SafeStorage.NWordsAllocated[] - SafeStorage.NWordsReclaimed[]
← CoreProperties.PutCellTypeProp[&ct, $MEMORY, NEW [INT ← &newmemory - &memory]]
← LayoutCheckpoint.Store[&ct, TRUE]
← EU2Utils.useControlCheckpoint ← TRUE
← &memory ← SafeStorage.NWordsAllocated[] - SafeStorage.NWordsReclaimed[]
← &ct ← EU2Inner.CreateEU2Inner[]
← &ob ← PWCore.Layout[&ct]
← &newmemory ← SafeStorage.NWordsAllocated[] - SafeStorage.NWordsReclaimed[]
← CoreProperties.PutCellTypeProp[&ct, $MEMORY, NEW [INT ← &newmemory - &memory]]
← LayoutCheckpoint.Store[&ct, TRUE]
← EU2Utils.useInnerCheckpoint ← TRUE
← &memory ← SafeStorage.NWordsAllocated[] - SafeStorage.NWordsReclaimed[]
← &ct ← EU2Impl.CreateEU2[fullEU: TRUE]
← &newmemory ← SafeStorage.NWordsAllocated[] - SafeStorage.NWordsReclaimed[]
← CoreProperties.PutCellTypeProp[&ct, $MEMORY, NEW [INT ← &newmemory - &memory]]
← &memory ← SafeStorage.NWordsAllocated[] - SafeStorage.NWordsReclaimed[]
← CoreIO.ReportSaveCellType[&ct] -- just in case routing does not succeed
← &ob ← PWCore.Layout[&ct]
← &newmemory ← SafeStorage.NWordsAllocated[] - SafeStorage.NWordsReclaimed[]
← CoreProperties.PutCellTypeProp[&ct, $MEMORY, NEW [INT ← &newmemory - &memory]]
← LayoutCheckpoint.Store[&ct, TRUE]
← PW.Draw[&ob]
-- Start the simulation!
Run -a EU2Sim
← EU2Impl.useCachedEU2 ← TRUE
← &ct ← EU2.CreateEU2[fullEU: TRUE]
← &sim ← EU2Sim.ExerciseRose[CoreOps.Recast[&ct], TRUE]
← Rosemary.Initialize[simulation: &sim, steady: FALSE]