2009-06-08 21:22:43 +03:00

27 lines
655 B
Bash

# -*- mode: shell-script; sh-basic-offset: 8; indent-tabs-mode: t -*-
# ex: ts=8 sw=8 noet filetype=sh
#
# bash programmable completion for various Common Lisp implementations by
# Nikodemus Siivola <nikodemus@random-state.net>
have gcl &&
_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 $default gcl