File: dbg-support.sub

package info (click to toggle)
bash 5.0-4
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 38,540 kB
  • sloc: ansic: 107,425; sh: 7,641; yacc: 5,401; makefile: 4,410; perl: 4,227; asm: 48; awk: 23; sed: 16
file content (26 lines) | stat: -rw-r--r-- 661 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
# This file is intended to be sourced from one of the bashdb test programs

sourced_fn() {
    name="fn2"
    echo "SOURCED FN LINENO $LINENO"

    # Print a stack trace
    declare -i n
    n=${#FUNCNAME[@]}
    for (( i=0 ; (( i < $n )) ; i++ )) ; do 
        local -i j=i+1
	[ $j -eq $n ] && j=i  # main()'s file is the same as the first caller
	echo "FUNCNAME[$i]: ${FUNCNAME[$i]} called from ${BASH_SOURCE[$j]}" \
	     "at line ${BASH_LINENO[$i]}"
    done
}

echo "SOURCED LINENO $LINENO"
echo "SOURCED BASH_SOURCE[0]" ${BASH_SOURCE[0]}
sourced_fn

#;;; Local Variables: ***
#;;; mode:shell-script ***
#;;; eval: (sh-set-shell "bash") ***
#;;; End: ***