#ident	"@(#)devintf:devices/reserve/free/getkey	1.1"
reservd=`devreserv`
found=false
key=-1
if [ "$reservd" ]
then
    alias=true
    for i in $reservd
    do
	if $alias
	then
	    if [ "$i" = "$1" ]
	    then
		found=true
	    fi
	    alias=false
	else
	    if $found
	    then
		key=$i
		break
	    fi
	    alias=true
	fi
    done
fi
echo $key
