<<>> -- ForkPerfTest.cm -- Christian Jacobi, June 8, 1993 5:36 pm PDT Echo ForkPerfTest.cm require Cedar ForkOps ForkPerfTest date self ForkPerfTest-SetSize 0 ForkPerfTest-SetSeed 0 ForkPerfTest-SetSimpleSizeLimit 8 ForkPerfTest-SetForkSizeLimit 200 ForkPerfTest-SetChainLength 4000 Echo GCollect (might make first test faster) GCollect Echo -- ? ForkPerfTest-Sort1 Echo Sequential Quicksort without allocations ForkPerfTest-Sort1; ForkPerfTest-Sort1; ForkPerfTest-Sort1; ForkPerfTest-Sort1; ForkPerfTest-Sort1 Echo -- ? ForkPerfTest-SortComp Echo GCollect (might make first test faster) GCollect Echo Sequential Quicksort with NEW for compensation ForkPerfTest-SortComp; ForkPerfTest-SortComp; ForkPerfTest-SortComp; ForkPerfTest-SortComp; ForkPerfTest-SortComp Echo -- ? ForkPerfTest-SortWorker2 Echo Using WorkerThreads.Fork (2 percent of threads) ForkPerfTest-SortWorker2; ForkPerfTest-SortWorker2; ForkPerfTest-SortWorker2; ForkPerfTest-SortWorker2; ForkPerfTest-SortWorker2 Echo -- ? ForkPerfTest-SortWorker8 Echo Using WorkerThreads.Fork (8 percent of threads) ForkPerfTest-SortWorker8; ForkPerfTest-SortWorker8; ForkPerfTest-SortWorker8; ForkPerfTest-SortWorker8; ForkPerfTest-SortWorker8 Echo -- ? ForkPerfTest-SortOptimum2 Echo Using exactly two threads without allocations ForkPerfTest-SortOptimum2; ForkPerfTest-SortOptimum2; ForkPerfTest-SortOptimum2; ForkPerfTest-SortOptimum2; ForkPerfTest-SortOptimum2 Echo -- ? ForkPerfTest-SortOptimum2Comp Echo Using exactly two threads with compensating allocations Echo GCollect (might make first test faster) GCollect ForkPerfTest-SortOptimum2Comp; ForkPerfTest-SortOptimum2Comp; ForkPerfTest-SortOptimum2Comp; ForkPerfTest-SortOptimum2Comp; ForkPerfTest-SortOptimum2Comp Echo -- ? ForkPerfTest-SetForkSizeLimit Echo Large ForkSizeLimit to prevent wedge in the next 2 tests ForkPerfTest-SetForkSizeLimit 4000 Echo -- ? ForkPerfTest-SortFORK Echo Using the language FORK primitive ForkPerfTest-SortFORK; ForkPerfTest-SortFORK; ForkPerfTest-SortFORK; ForkPerfTest-SortFORK; ForkPerfTest-SortFORK Echo -- ? ForkPerfTest-SortForkOps Echo Using ForkOps.Fork ForkPerfTest-SortForkOps; ForkPerfTest-SortForkOps; ForkPerfTest-SortForkOps; ForkPerfTest-SortForkOps; ForkPerfTest-SortForkOps Echo -- ? ForkPerfTest-ChainedFORK Echo language FORK linear chain instead of tree ForkPerfTest-ChainedFORK; ForkPerfTest-ChainedFORK; ForkPerfTest-ChainedFORK; ForkPerfTest-ChainedFORK; ForkPerfTest-ChainedFORK Echo -- ? ForkPerfTest-ChainedForkOps Echo ForkOps.Fork linear chain instead of tree ForkPerfTest-ChainedForkOps; ForkPerfTest-ChainedForkOps; ForkPerfTest-ChainedForkOps; ForkPerfTest-ChainedForkOps; ForkPerfTest-ChainedForkOps Echo -- ? ForkPerfTest-MultiChainedFORK Echo language FORK two linear chains ForkPerfTest-MultiChainedFORK; ForkPerfTest-MultiChainedFORK; ForkPerfTest-MultiChainedFORK; ForkPerfTest-MultiChainedFORK; ForkPerfTest-MultiChainedFORK Echo -- ? ForkPerfTest-MultiChainedForkOps Echo ForkOps.Fork two linear chains ForkPerfTest-MultiChainedForkOps; ForkPerfTest-MultiChainedForkOps; ForkPerfTest-MultiChainedForkOps; ForkPerfTest-MultiChainedForkOps; ForkPerfTest-MultiChainedForkOps Echo -- ForkPerfTest-Parameters ForkPerfTest-Free date self Echo done