File: gcl

package info (click to toggle)
bash-completion 20080705
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 516 kB
  • ctags: 2
  • sloc: sh: 56; makefile: 37; perl: 15
file content (24 lines) | stat: -rw-r--r-- 590 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
# bash programmable completion for various Common Lisp implementations by
# Nikodemus Siivola <nikodemus@random-state.net>
#
# $Id: gcl,v 1.2 2004/03/30 23:05:45 ianmacd Exp $

_gcl()
{
    local cur

    COMPREPLY=()
    cur=`_get_cword`

    # completing an option (may or may not be separated by a space)
    if [[ "$cur" == -* ]]; then
	COMPREPLY=( $( compgen -W '-eval -load -f -batch -dir -libdir \
                     -compile -o-file -c-file -h-file -data-file -system-p '\
                     -- $cur ) )
    else
	_filedir
    fi

    return 0
}
complete -F _gcl -o default gcl