mirror of
https://github.com/fish-shell/fish-shell
synced 2024-11-11 15:37:24 +00:00
5947aa0171
This switches quoted expansion like "$foo" to use foo's delimiter instead of space. The delimiter is space for normal variables and colonf or path variables. Expansions like "$PATH" will now expand using ':'.
133 lines
2.8 KiB
Fish
133 lines
2.8 KiB
Fish
# Test expansion of variables
|
|
|
|
# We don't use the test utility function of the same name because we want
|
|
# different behavior. Specifically, that the expansion of any variables or
|
|
# other strings before we are invoked produce the expected expansion.
|
|
function expansion --description 'Prints argument count followed by arguments'
|
|
echo (count $argv) $argv
|
|
end
|
|
|
|
set -l foo
|
|
expansion "$foo"
|
|
expansion $foo
|
|
expansion "prefix$foo"
|
|
expansion prefix$foo
|
|
|
|
expansion "$$foo"
|
|
expansion $$foo
|
|
expansion "prefix$$foo"
|
|
expansion prefix$$foo
|
|
|
|
set -l foo ''
|
|
expansion "$foo"
|
|
expansion $foo
|
|
expansion "prefix$foo"
|
|
expansion prefix$foo
|
|
|
|
expansion "$$foo"
|
|
expansion $$foo
|
|
expansion "prefix$$foo"
|
|
expansion prefix$$foo
|
|
|
|
set -l foo bar
|
|
set -l bar
|
|
expansion "$$foo"
|
|
expansion $$foo
|
|
expansion "prefix$$foo"
|
|
expansion prefix$$foo
|
|
|
|
set -l bar baz
|
|
expansion "$$foo"
|
|
expansion $$foo
|
|
expansion "prefix$$foo"
|
|
expansion prefix$$foo
|
|
|
|
set -l bar baz quux
|
|
expansion "$$foo"
|
|
expansion $$foo
|
|
expansion "prefix$$foo"
|
|
expansion prefix$$foo
|
|
|
|
set -l foo bar fooer fooest
|
|
set -l fooer
|
|
set -l fooest
|
|
expansion "$$foo"
|
|
expansion $$foo
|
|
expansion "prefix$$foo"
|
|
expansion prefix$$foo
|
|
|
|
set -l fooer ''
|
|
expansion $$foo
|
|
expansion prefix$$foo
|
|
|
|
set -l foo bar '' fooest
|
|
expansion "$$foo"
|
|
expansion $$foo
|
|
expansion "prefix$$foo"
|
|
expansion prefix$$foo
|
|
expansion $foo[-5..2] # No result, because the starting index is invalid and we force-reverse.
|
|
expansion $foo[-2..-1]
|
|
expansion $foo[-10..-5]
|
|
expansion (printf '%s\n' $foo)[-5..2]
|
|
expansion (printf '%s\n' $foo)[-2..-1]
|
|
expansion (printf '%s\n' $foo)[-10..-5]
|
|
expansion (echo one)[2..-1]
|
|
|
|
echo "# foo = "
|
|
set -l foo
|
|
expansion "$foo[1]"
|
|
expansion $foo[1]
|
|
expansion "$foo[-1]"
|
|
expansion $foo[-1]
|
|
expansion "$foo[2]"
|
|
expansion $foo[2]
|
|
expansion "$foo[1 2]"
|
|
expansion $foo[1 2]
|
|
expansion "$foo[2 1]"
|
|
expansion $foo[2 1]
|
|
echo "# foo = a b c"
|
|
set -l foo a b c
|
|
expansion $foo[17]
|
|
expansion $foo[-17]
|
|
expansion $foo[17..18]
|
|
expansion $foo[4..-2]
|
|
echo "# foo = a"
|
|
set -l foo a
|
|
expansion $foo[2..-1]
|
|
|
|
echo "$foo[d]"
|
|
echo $foo[d]
|
|
|
|
echo ()[1]
|
|
echo ()[d]
|
|
|
|
logmsg Percent self
|
|
echo %selfNOT NOT%self \%self "%self" '%self'
|
|
echo %self | string match -qr '^\\d+$'
|
|
echo "All digits: $status"
|
|
|
|
logmsg Catch your breath
|
|
set paren ')'
|
|
echo $$paren
|
|
|
|
logmsg Test tilde expansion
|
|
# On OS X, /tmp is symlinked to /private/tmp
|
|
# $PWD is our best bet for resolving it
|
|
set -l saved $PWD
|
|
cd (mktemp -d)
|
|
set tmpdir $PWD
|
|
cd $saved
|
|
mkdir $tmpdir/realhome
|
|
ln -s $tmpdir/realhome $tmpdir/linkhome
|
|
set expandedtilde (env HOME=$tmpdir/linkhome ../test/root/bin/fish -c 'echo ~')
|
|
if test $expandedtilde != $tmpdir/linkhome
|
|
echo '~ expands to' $expandedtilde ' - expected ' $tmpdir/linkhome
|
|
end
|
|
unlink $tmpdir/linkhome
|
|
rmdir $tmpdir/realhome
|
|
rmdir $tmpdir
|
|
|
|
logmsg Test delimiters
|
|
set TEST_DELIMITER one two three
|
|
set TEST_DELIMITER_PATH one two three
|
|
echo "$TEST_DELIMITER" "$TEST_DELIMITER_PATH"
|