-- 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