-- Luther.cm
-- Last edited by
--   MBrown on January 31, 1984 9:49:40 pm PST
--   Kolling on June 22, 1983 10:19 am
Run AlpineServerImpls
← AlpineControl.Initialize[filePageMgrNormalChunks: 50, filePageMgrLogChunks: 50, filePageMgrLeaderChunks: 10, coordinatorMapHashArraySlots: 64, transactionMapHashArraySlots: 64, fileMapHashArraySlots: 43, openFileMapHashArraySlots: 256, lockHashArraySlots: 256, fileMapFinalizationQueueLength: 60, nAccessCacheEntries: 20, alpineWheels: "AlpineWheels↑.pa"];
← AlpineControl.Start[fileStore: "Luther.alpine", typeOfRestart: warmStart, nLogPages: 10000, nOwners: 10];
← AlpineControl.ExportInterfaces[];

-- Run TransactionDebugImpl
-- ← TransactionDebugImpl.PrintTransactions[];