#!../../bash
# Note: no CVS Id line since it would mess up regression testing.
# This code is used for various debugger testing.

proc fn1 {
    echo "fn1 here"
    setglobal x = '5'
    fn3
}    

proc fn2 {
    setglobal name = '"fn2'"
    echo "$name here"
    setglobal x = '6'
}    

proc fn3 {
    setglobal name = '"fn3'"
    setglobal x = $1
}    

setglobal x = '22'
setglobal x = '23'
for i in [1]  {
  sh-expr 'x += i'
}
setglobal x = '27'
echo $[fn3 30]
fn3 29
fn1;
fn3 31
match x { 
 with *  x = 33
}
[[ -z "x" ]] && setglobal x = '35'
sh-expr 'x += 1'
source dbg-test1.sub
exit 0;
#;;; Local Variables: ***
#;;; mode:shell-script ***
#;;; End: ***