1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
# -*- shell-script -*-
# bash programmable completion for various Common Lisp implementations by
# Nikodemus Siivola <nikodemus@random-state.net>
_gcl()
{
local cur prev words cword
_init_completion || return
# 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
} &&
complete -F _gcl -o default gcl
# ex: filetype=sh
|
