File: __driver__.lua

package info (click to toggle)
monotone 0.31-6
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 20,680 kB
  • ctags: 14,801
  • sloc: cpp: 87,711; ansic: 64,862; sh: 5,691; lisp: 954; perl: 783; makefile: 509; python: 265; sql: 98; sed: 16
file content (42 lines) | stat: -rw-r--r-- 894 bytes parent folder | download
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

mtn_setup()

addfile("foo", "foo\n")
addfile("bar", "bar\n")

commit()
REV1=base_revision()

writefile("foo", "foo changed\n")

commit()
REV2=base_revision()

addfile("quux", "quux\n")

commit()
REV3=base_revision()

writefile("foo", "foo again\n")
writefile("bar", "bar again\n")

check(mtn("rename", "-e", "foo", "foo2"), 0, false, false)

commit()
REV4=base_revision()

-- without restrictions
check(mtn("log", "--diffs"), 0, true, false)
check(grep('^(---|\\+\\+\\+) ', "stdout"), 0, true, false)
rename("stdout", "full")
check(get("expect_full"))
canonicalize("full")
check(samefile("expect_full", "full"))

-- restrict to foo2 and quux
check(mtn("log", "quux", "--diffs", "foo2"), 0, true, false)
check(grep("^(---|\\+\\+\\+) ", "stdout"), 0, true, false)
rename("stdout", "restrict")
check(get("expect_restrict"))
canonicalize("restrict")
check(samefile("expect_restrict", "restrict"))