1*13de33a5SJulio Merino 2*13de33a5SJulio Merinoe= q='?' a='*' t=texttext s='ast*que?non' p='/et[c]/' w='a b c' b='{{(#)}}' 3*13de33a5SJulio Merinoh='##' 4*13de33a5SJulio Merinofailures='' 5*13de33a5SJulio Merinook='' 6*13de33a5SJulio Merino 7*13de33a5SJulio Merinotestcase() { 8*13de33a5SJulio Merino code="$1" 9*13de33a5SJulio Merino expected="$2" 10*13de33a5SJulio Merino oIFS="$IFS" 11*13de33a5SJulio Merino eval "$code" 12*13de33a5SJulio Merino IFS='|' 13*13de33a5SJulio Merino result="$#|$*" 14*13de33a5SJulio Merino IFS="$oIFS" 15*13de33a5SJulio Merino if [ "x$result" = "x$expected" ]; then 16*13de33a5SJulio Merino ok=x$ok 17*13de33a5SJulio Merino else 18*13de33a5SJulio Merino failures=x$failures 19*13de33a5SJulio Merino echo "For $code, expected $expected actual $result" 20*13de33a5SJulio Merino fi 21*13de33a5SJulio Merino} 22*13de33a5SJulio Merino 23*13de33a5SJulio Merinotestcase 'v=; set -- ${v=a b} $v' '0|' 24*13de33a5SJulio Merinotestcase 'unset v; set -- ${v=a b} $v' '4|a|b|a|b' 25*13de33a5SJulio Merinotestcase 'v=; set -- ${v:=a b} $v' '4|a|b|a|b' 26*13de33a5SJulio Merinotestcase 'v=; set -- "${v:=a b}" "$v"' '2|a b|a b' 27*13de33a5SJulio Merino# expect sensible behaviour, although it disagrees with POSIX 28*13de33a5SJulio Merinotestcase 'v=; set -- ${v:=a\ b} $v' '4|a|b|a|b' 29*13de33a5SJulio Merinotestcase 'v=; set -- ${v:=$p} $v' '2|/etc/|/etc/' 30*13de33a5SJulio Merinotestcase 'v=; set -- "${v:=$p}" "$v"' '2|/et[c]/|/et[c]/' 31*13de33a5SJulio Merinotestcase 'v=; set -- "${v:=a\ b}" "$v"' '2|a\ b|a\ b' 32*13de33a5SJulio Merinotestcase 'v=; set -- ${v:="$p"} $v' '2|/etc/|/etc/' 33*13de33a5SJulio Merino# whether $p is quoted or not shouldn't really matter 34*13de33a5SJulio Merinotestcase 'v=; set -- "${v:="$p"}" "$v"' '2|/et[c]/|/et[c]/' 35*13de33a5SJulio Merino 36*13de33a5SJulio Merinotest "x$failures" = x 37