2009-01-14 22:17:14 +02:00
|
|
|
# -*- mode: shell-script; sh-basic-offset: 8; indent-tabs-mode: t -*-
|
2009-01-17 11:38:33 +02:00
|
|
|
# ex: ts=8 sw=8 noet filetype=sh
|
2009-01-14 22:17:14 +02:00
|
|
|
#
|
2004-03-30 18:56:02 +00:00
|
|
|
# bash programmable completion for various Common Lisp implementations by
|
|
|
|
# Nikodemus Siivola <nikodemus@random-state.net>
|
|
|
|
|
2009-06-08 21:22:43 +03:00
|
|
|
have sbcl || have sbcl-mt &&
|
2004-03-30 18:56:02 +00:00
|
|
|
_sbcl()
|
|
|
|
{
|
|
|
|
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 '--core --noinform --help --version \
|
|
|
|
--sysinit --userinit --eval --noprint --disable-debugger \
|
|
|
|
--end-runtime-options --end-toplevel-options ' -- $cur ) )
|
|
|
|
else
|
|
|
|
_filedir
|
|
|
|
fi
|
|
|
|
|
|
|
|
return 0
|
2009-06-08 21:22:43 +03:00
|
|
|
} &&
|
2009-02-05 10:11:24 +01:00
|
|
|
complete -F _sbcl $default sbcl sbcl-mt
|