File Manager

#                                                          -*- 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