12bbb66931
git-subtree-dir: cde/programs/dtksh/ksh93 git-subtree-split: 66e1d446429543be0f9d47d9364e472932dc53f1
29 lines
488 B
Plaintext
29 lines
488 B
Plaintext
function getopt
|
|
{
|
|
typeset c optstring=$1 options= sep=
|
|
shift
|
|
while getopts $optstring c
|
|
do case $c in
|
|
[:?])
|
|
exit 2
|
|
;;
|
|
*)
|
|
options="$options$sep-$c"
|
|
sep=' '
|
|
if [[ $optstring == *$c:* ]]
|
|
then options=" $options $OPTARG"
|
|
fi
|
|
#then print -rn -- " -$c" "$OPTARG"
|
|
#else print -rn -- " -$c"
|
|
;;
|
|
esac
|
|
done
|
|
print -rn -- "$options"
|
|
if [[ ${@:$OPTIND-1} != -- ]]
|
|
then print -rn -- " --"
|
|
fi
|
|
if [[ -n ${@:$OPTIND} ]]
|
|
then print -r -- " ${@:$OPTIND}"
|
|
fi
|
|
}
|