#!/bin/rcecho T.close: test close built-in >[1=2] sed 1000q /lib/ucd/UnicodeData.txt >foo.txt rm -f foo$awk '{ print >>"foo"; close("foo") }' foo.txtdiff foo.txt foo || echo 'BAD: T.close: 1' >[1=2] ls -l >footail -1 foo >foo1$awk '{ print >"foo2"; close("foo2") }' foodiff foo1 foo2 || echo 'BAD: T.close: 2' >[1=2]
#!/bin/rc
echo T.close: test close built-in >[1=2]
sed 1000q /lib/ucd/UnicodeData.txt >foo.txt
rm -f foo
$awk '{ print >>"foo"; close("foo") }' foo.txt
diff foo.txt foo || echo 'BAD: T.close: 1' >[1=2]
ls -l >foo
tail -1 foo >foo1
$awk '{ print >"foo2"; close("foo2") }' foo
diff foo1 foo2 || echo 'BAD: T.close: 2' >[1=2]