2004-03-30 18:56:02 +00:00
|
|
|
# bash programmable completion for various Common Lisp implementations by
|
|
|
|
# Nikodemus Siivola <nikodemus@random-state.net>
|
|
|
|
#
|
2004-03-30 21:05:45 +00:00
|
|
|
# $Id: gcl,v 1.2 2004/03/30 23:05:45 ianmacd Exp $
|
2004-03-30 18:56:02 +00:00
|
|
|
|
|
|
|
_gcl()
|
|
|
|
{
|
|
|
|
local cur
|
|
|
|
|
|
|
|
COMPREPLY=()
|
2008-05-10 18:04:06 +02:00
|
|
|
cur=`_get_cword`
|
2004-03-30 18:56:02 +00:00
|
|
|
|
|
|
|
# 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
|