File: _next_label

package info (click to toggle)
zsh-beta 4.3.2-dev-1%2B20061127-1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 13,260 kB
  • ctags: 6,846
  • sloc: ansic: 83,534; sh: 5,094; makefile: 781; perl: 746; awk: 364; sed: 16
file content (25 lines) | stat: -rw-r--r-- 600 bytes parent folder | download | duplicates (16) 
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
 
#autoload

local __gopt __descr __spec

__gopt=()
zparseopts -D -a __gopt 1 2 V J x

if comptags -A "$1" curtag __spec; then
  (( $#funcstack > _tags_level )) && _comp_tags="${_comp_tags% * }"
  _tags_level=$#funcstack
  _comp_tags="$_comp_tags $__spec "
  if [[ "$curtag" = *[^\\]:* ]]; then
    zformat -f __descr "${curtag#*:}" "d:$3"
    _description "$__gopt[@]" "${curtag%:*}" "$2" "$__descr"
    curtag="${curtag%:*}"
    set -A $2 "${(P@)2}" "${(@)argv[4,-1]}"
  else
    _description "$__gopt[@]" "$curtag" "$2" "$3"
    set -A $2 "${(@)argv[4,-1]}" "${(P@)2}"
  fi

  return 0
fi

return 1