#!/bin/sh test_description='check infrastructure for svn importer' . ./test-lib.sh uint32_max=4294967295 test_expect_success 'obj pool: store data' ' cat <<-\EOF >expected && 0 1 EOF test-obj-pool <<-\EOF >actual && alloc one 16 set one 13 test one 13 reset one EOF test_cmp expected actual ' test_expect_success 'obj pool: NULL is offset ~0' ' echo "$uint32_max" >expected && echo null one | test-obj-pool >actual && test_cmp expected actual ' test_expect_success 'obj pool: out-of-bounds access' ' cat <<-EOF >expected && 0 0 $uint32_max $uint32_max 16 20 $uint32_max EOF test-obj-pool <<-\EOF >actual && alloc one 16 alloc two 16 offset one 20 offset two 20 alloc one 5 offset one 20 free one 1 offset one 20 reset one reset two EOF test_cmp expected actual ' test_expect_success 'obj pool: high-water mark' ' cat <<-\EOF >expected && 0 0 10 20 20 20 EOF test-obj-pool <<-\EOF >actual && alloc one 10 committed one alloc one 10 commit one committed one alloc one 10 free one 20 committed one reset one EOF test_cmp expected actual ' test_expect_success 'string pool' ' echo a does not equal b >expected.differ && echo a equals a >expected.match && echo equals equals equals >expected.matchmore && test-string-pool "a,--b" >actual.differ && test-string-pool "a,a" >actual.match && test-string-pool "equals-equals" >actual.matchmore && test_must_fail test-string-pool a,a,a && test_must_fail test-string-pool a && test_cmp expected.differ actual.differ && test_cmp expected.match actual.match && test_cmp expected.matchmore actual.matchmore ' test_expect_success 'treap sort' ' cat <<-\EOF >unsorted && 68 12 13 13 68 13 13 21 10 11 12 13 13 EOF sort unsorted >expected && test-treap <unsorted >actual && test_cmp expected actual ' test_done