fish-shell/tests/checks/function.fish

#RUN: %fish %s
function t --argument-names a b c
    echo t
end

set -g foo 'global foo'
set -l foo 'local foo'
set bar one 'two    2' \t '' 3
set baz
function frob -V foo -V bar -V baz
    set --show foo bar baz
end

frob
#CHECK: $foo: set in local scope, unexported, with 1 elements
#CHECK: $foo[1]: length=9 value=|local foo|
#CHECK: $foo: set in global scope, unexported, with 1 elements
#CHECK: $foo[1]: length=10 value=|global foo|
#CHECK: $foo: not set in universal scope
#CHECK: 
#CHECK: $bar: set in local scope, unexported, with 5 elements
#CHECK: $bar[1]: length=3 value=|one|
#CHECK: $bar[2]: length=8 value=|two    2|
#CHECK: $bar[3]: length=1 value=|\t|
#CHECK: $bar[4]: length=0 value=||
#CHECK: $bar[5]: length=1 value=|3|
#CHECK: $bar: set in global scope, unexported, with 5 elements
#CHECK: $bar[1]: length=3 value=|one|
#CHECK: $bar[2]: length=8 value=|two    2|
#CHECK: $bar[3]: length=1 value=|\t|
#CHECK: $bar[4]: length=0 value=||
#CHECK: $bar[5]: length=1 value=|3|
#CHECK: $bar: not set in universal scope
#CHECK: 
#CHECK: $baz: set in local scope, unexported, with 0 elements
#CHECK: $baz: set in global scope, unexported, with 0 elements
#CHECK: $baz: not set in universal scope

set foo 'bad foo'
set bar 'bad bar'
set baz 'bad baz'
frob
#CHECK: $foo: set in local scope, unexported, with 1 elements
#CHECK: $foo[1]: length=9 value=|local foo|
#CHECK: $foo: set in global scope, unexported, with 1 elements
#CHECK: $foo[1]: length=10 value=|global foo|
#CHECK: $foo: not set in universal scope
#CHECK: 
#CHECK: $bar: set in local scope, unexported, with 5 elements
#CHECK: $bar[1]: length=3 value=|one|
#CHECK: $bar[2]: length=8 value=|two    2|
#CHECK: $bar[3]: length=1 value=|\t|
#CHECK: $bar[4]: length=0 value=||
#CHECK: $bar[5]: length=1 value=|3|
#CHECK: $bar: set in global scope, unexported, with 1 elements
#CHECK: $bar[1]: length=7 value=|bad bar|
#CHECK: $bar: not set in universal scope
#CHECK: 
#CHECK: $baz: set in local scope, unexported, with 0 elements
#CHECK: $baz: set in global scope, unexported, with 1 elements
#CHECK: $baz[1]: length=7 value=|bad baz|
#CHECK: $baz: not set in universal scope
#CHECK: 

# This sequence of tests originally verified that functions `name2` and
# `name4` were created. See issue #2068. That behavior is not what we want.
# The function name must always be the first argument of the `function`
# command. See issue #2827.
function name1 -a arg1 arg2
    echo hello
end
function -a arg1 arg2 name2
end
#CHECKERR: {{.*}}checks/function.fish (line {{\d+}}): function: Illegal function name '-a'
#CHECKERR: function -a arg1 arg2 name2
#CHECKERR: ^
function name3 --argument-names arg1 arg2
    echo hello
    echo goodbye
end
function --argument-names arg1 arg2 name4
end
#CHECKERR: {{.*}}checks/function.fish (line {{\d+}}): function: Illegal function name '--argument-names'
#CHECKERR: function --argument-names arg1 arg2 name4
#CHECKERR: ^
function name5 abc --argument-names def
end
#CHECKERR: {{.*}}checks/function.fish (line {{\d+}}): function: Unexpected positional argument 'abc'
#CHECKERR: function name5 abc --argument-names def
#CHECKERR: ^
functions -q name1; and echo "Function name1 found"
functions -q name2; or echo "Function name2 not found as expected"
functions -q name3; and echo "Function name3 found"
functions -q name4; or echo "Function name4 not found as expected"
#CHECK: Function name1 found
#CHECK: Function name2 not found as expected
#CHECK: Function name3 found
#CHECK: Function name4 not found as expected

functions -c name1 name1a
functions --copy name3 name3a
functions -q name1a
or echo "Function name1a not found as expected"
functions -q name3a
or echo "Function name3a not found as expected"

# Poor man's diff because on some systems diff defaults to unified output, but that prints filenames.
#
set -l name1 (functions name1)
set -l name1a (functions name1a)
set -l name3 (functions name3)
set -l name3a (functions name3a)
# First line for the non-copied function is "# Defined in checks/function.fish" - skip it to work around #6575.
test "$name1[3..-1]" = "$name1a[2..-1]"; and echo "1 = 1a"
#CHECK: 1 = 1a
test "$name3[3..-1]" = "$name3a[2..-1]"; and echo "3 = 3a"
#CHECK: 3 = 3a

function test
    echo banana
end
#CHECKERR: {{.*}}checks/function.fish (line {{\d+}}): function: The name 'test' is reserved,
#CHECKERR: and can not be used as a function name
#CHECKERR: function test
#CHECKERR: ^

functions -q; or echo False
#CHECK: False
exit 0