# IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
# CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
# IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
# CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
["--debug", "-d", GetoptLong::NO_ARGUMENT],
["--help", "-h", GetoptLong::NO_ARGUMENT],
["--debug", "-d", GetoptLong::NO_ARGUMENT],
["--help", "-h", GetoptLong::NO_ARGUMENT],
["--trace", "-t", GetoptLong::REQUIRED_ARGUMENT],
["--version", "-v", GetoptLong::NO_ARGUMENT]
)
$debug = false
["--trace", "-t", GetoptLong::REQUIRED_ARGUMENT],
["--version", "-v", GetoptLong::NO_ARGUMENT]
)
$debug = false
if ($opts["trace"])
set_trace_func proc { |event, file, line, id, binding, classname|
if classname.to_s == $opts["trace"]
if ($opts["trace"])
set_trace_func proc { |event, file, line, id, binding, classname|
if classname.to_s == $opts["trace"]
puts " -h, --help this message"
puts " -v, --version version information"
puts " -d, --debug enable debug messages"
puts " -h, --help this message"
puts " -v, --version version information"
puts " -d, --debug enable debug messages"