tests/sh.dol.at

   1 # $... substitution handling
   2
   3 AT_SETUP([$<])
   4
   5 AT_DATA([cat.csh],
   6 [[while (1)
   7   set line=$<:q
   8   if ("$line" == "") goto END;
   9   echo "$line"
  10 end
  11 END:
  12   exit 0
  13 ]])
  14 AT_DATA([input],
  15 [[foo
  16 !@#$%^&*()_+-=[]{};':"\|,./<>?`~
  17 ]])
  18 AT_CHECK([tcsh -f cat.csh < input | cmp -s input -])
  19
  20 AT_CLEANUP