1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
|
. lib
rm -rf R
darcs init --repo R
cd R
[[ $(darcs log FOO --count | tail -n 1) -eq 0 ]]
touch f0
darcs record -lam 'p0'
mkdir d1
darcs record -lam 'p1'
touch d1/f1
darcs record -lam 'p2'
darcs move f0 d1/f0
darcs record -am 'p3'
touch d1/f2
darcs record -lam 'p4'
rm d1/f1
darcs record -am 'p5'
darcs move d1/f0 f0
darcs record -am 'p6'
darcs move d1 d2
darcs record -am 'p7'
mkdir d1
darcs record -lam 'p8'
touch d1/f3
darcs record -lam 'p9'
echo "f0" > f0
darcs record -am 'p10'
# log on directories gives all patches
# that touched any sub path (including itself)
# Note that the path of the directory varies
# as you move backward in history.
# The sub path comparision is with the path
# the directory had when the patch which is is being
# tested has been just applied.
# d1 <-> p8-p9
[[ $(darcs log d1 --count | tail -n 1) -eq 2 ]]
for i in 8 9
do
darcs log d1 | grep p$i
done
# d2 <-> p1-p7
[[ $(darcs log d2 --count | tail -n 1) -eq 7 ]]
for i in {1..7}
do
darcs log d2 | grep p$i
done
darcs optimize disable-patch-index
[[ $(darcs log FOO --count | tail -n 1) -eq 0 ]]
[[ $(darcs log d1 --count | tail -n 1) -eq 2 ]]
for i in 8 9
do
darcs log d1 | grep p$i
done
[[ $(darcs log d2 --count | tail -n 1) -eq 7 ]]
for i in {1..7}
do
darcs log d2 | grep p$i
done
|
