-- Gentian.cm -- Last edited by -- Kolling on June 8, 1983 3:44 pm Run AlpineImpls -- loads server without ability to export. _ AlpineControl.Initialize[filePageMgrNormalChunks: 50, filePageMgrLogChunks: 50, filePageMgrLeaderChunks: 10, coordinatorMapHashArraySlots: 64, transactionMapHashArraySlots: 64, fileMapHashArraySlots: 43, openFileMapHashArraySlots: 256, lockHashArraySlots: 256, fileMapFinalizationQueueLength: 50, nAccessCacheEntries: 20, alpineWheels: "AlpineImplementors^.pa", staticZoneInitialSize: 1024]; Run LocalWorkstationServerImpl -- loads some interesting procedures for initing the log, etc. -- can checkpoint to here (including transactiontest) ?? _ LocalWorkstationServerImpl.Initialize[fileStore: "Gentian.alpine", create: TRUE, erase: FALSE, nLogPages: 1000, nOwners: 10]; -- maybe init and do recovery, etc. Run OldTransactionTest _ OldTransactionTestImpl.StartTestFromScratch[newCaller: NIL, fileStore: "local.alpine", nNormalTransactions: 0, nSharingTransactionSets: 1, nTransPerSharingSet: 2, nFilesPerTransaction: 1, nPageRunStatesPerFile: 3, initialSeed: 0]; _ OldTransactionTestImpl.StartTestFromScratch[newCaller: NIL, fileStore: "local.alpine", nNormalTransactions: 0, nSharingTransactionSets: 1, nTransPerSharingSet: 2, nFilesPerTransaction: 1, nPageRunStatesPerFile: 3, initialSeed: 0]; _ OldTransactionTestImpl.StartTestFromScratch[newCaller: NIL, fileStore: "local.alpine", nNormalTransactions: 4, nSharingTransactionSets: 0, nTransPerSharingSet: 0, nFilesPerTransaction: 1, nPageRunStatesPerFile: 3, initialSeed: 0]; ΚU– "cedar" style˜JšœWΟc*œ­?œΟn8œ‚#œΌΟkœιŸœιŸœF˜€ —…—&