#!/bin/rc
echo T.main: misc tests of arguments in main >[1=2]

# test -d option
echo hello | $awk -d '{print}' >foo1 || echo 'BAD: T.main: awk -d (wanted to) drop core' >[1=2]

echo 'a::b::c' >foo
$awk -F:: '{print NF}' foo >foo1
echo '3' >foo2
diff foo1 foo2 || echo 'BAD: T.main: awk -F::' >[1=2]

echo 'a::b::c' >foo
$awk -F :: '{print NF}' foo >foo1
echo '3' >foo2
diff foo1 foo2 || echo 'BAD: T.main: awk -F ::' >[1=2]

echo 'a	b	c' >foo
$awk -F t '{print NF}' foo >foo1
echo '3' >foo2
diff foo1 foo2 || echo 'BAD: T.main: awk -F (tab)' >[1=2]

echo 'atabbtabc' >foo
$awk -F tab '{print NF}' foo >foo1
echo '3' >foo2
diff foo1 foo2 || echo 'BAD: T.main: awk -F tab' >[1=2]