File: argv.at

package info (click to toggle)
rcs-blame 1.4%2B20240206-1
  • links: PTS, VCS
  • area: main
  • in suites: sid, trixie
  • size: 2,816 kB
  • sloc: ansic: 15,922; sh: 10,108; makefile: 399; yacc: 389; lex: 156
file content (54 lines) | stat: -rw-r--r-- 1,304 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
43
44
45
46
47
48
49
50
51
52
53
54
AT_BANNER([[Command line argument parsing.]])

AT_SETUP([No arguments])
AT_KEYWORDS([argv])
AT_KEYWORDS([errors])
AT_CHECK([[blame]], 1, , stderr)
MAC_CHECK_STDERR
AT_CLEANUP

AT_SETUP([Invalid argument])
AT_KEYWORDS([argv])
AT_KEYWORDS([errors])
AT_CHECK([[blame --footle]], 1, , stderr)
MAC_CHECK_STDERR
AT_CLEANUP

AT_SETUP([-? and --help])
AT_KEYWORDS([argv])
AT_CHECK([[blame -?]], 0, ignore, )
AT_CHECK([[blame --help]], 0, ignore, )
AT_CLEANUP

AT_SETUP([-V and --version])
AT_KEYWORDS([argv])
cat <<EOF > expout
$package_string ($package_date); emulating RCS version 5
EOF
AT_CHECK([[blame -V]], 0, expout, )
AT_CHECK([[blame --version]], 0, stdout, )
AT_CLEANUP

AT_SETUP([Non-existent working file])
AT_KEYWORDS([argv])
AT_KEYWORDS([errors])
AT_CHECK([[blame /nonexistent]], 1, , stderr)
MAC_CHECK_STDERR
AT_CLEANUP

AT_SETUP([Non-existent RCS file])
AT_KEYWORDS([argv])
AT_KEYWORDS([errors])
AT_CHECK([[blame /nonexistent,v]], 1, , stderr)
MAC_CHECK_STDERR
AT_CLEANUP

AT_SETUP([Filenames only])
AT_KEYWORDS([argv])
cp $testdir/simple-1.2.expout expout
cp $testdir/simple.experr experr
AT_CHECK([[blame $testdir/simple,v]], 0, expout, experr)
rm -f experr
cat $testdir/simple.experr | sed "s,simple,$testdir/simple,g" > experr
AT_CHECK([[blame $testdir/simple]], 0, expout, experr)
AT_CLEANUP