blob: c721d434eca549ffccb6551c46774a66779de375 (
plain)
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
|
#!/bin/sh
# m4exit.1.test is part of the GNU m4 testsuite
# generated from example in ../doc/m4.texinfo line 3475
. ${srcdir}/defs
cat <<\EOF >in
define(`fatal_error', `errprint(`m4: '__file__: __line__`: fatal error: $*
')m4exit(1)')
fatal_error(`This is a BAD one, buster')
EOF
cat <<\EOF >ok
EOF
cat <<\EOF >okerr
m4: in: 3: fatal error: This is a BAD one, buster
EOF
$M4 -d in >out 2>err
sed -e "s, ../../src/m4:, m4:," err >sederr && mv sederr err
$CMP -s out ok && $CMP -s err okerr
|
