tools/regression/bin/sh/expansion/trim5.0

   1 # $FreeBSD: src/tools/regression/bin/sh/expansion/trim5.0,v 1.1 2010/10/28 21:51:14 jilles Exp $
   2
   3 e= q='?' a='*' t=texttext s='ast*que?non' p='/et[c]/' w='a b c' b='{{(#)}}'
   4 h='##'
   5 failures=''
   6 ok=''
   7
   8 testcase() {
   9         code="$1"
  10         expected="$2"
  11         oIFS="$IFS"
  12         eval "$code"
  13         IFS='|'
  14         result="$#|$*"
  15         IFS="$oIFS"
  16         if [ "x$result" = "x$expected" ]; then
  17                 ok=x$ok
  18         else
  19                 failures=x$failures
  20                 echo "For $code, expected $expected actual $result"
  21         fi
  22 }
  23
  24 testcase 'set -- "${b%'\'}\''}"'                '1|{{(#)}'
  25 testcase 'set -- ${b%"}"}'                      '1|{{(#)}'
  26 testcase 'set -- "${b%"}"}"'                    '1|{{(#)}'
  27
  28 test "x$failures" = x