######## No User serviceable part below ! ########
# You should really not look any further:
# The following is private unexported undocumented 
# unblessed... code time to hit "q" ;-) !

# Hmmm... ok, you really want to know ?

# You’ve been warned… Here it is...

# Array storing the parsed descriptions
variable OptDesc;
array set OptDesc {};
# Next potentially free key id (numeric)
variable OptDescN 0;

# Inside algorithm/mechanism description:
# (not for the faint hearted ;-)
Source: Direct link to the source code
Software: Option parsing package
Programming language: TCL