source [expr {[info exists ::env(TESTS_DIR)] ? "$env(TESTS_DIR)/ly.tcl" : "ly.tcl"}] test arg_empty {Missing arguments} { ly_cmd_err "" "missing parameter to process" } {} test arg_wrong {Wrong argument} { ly_cmd_err "-j" "invalid option" } {} test arg_help {Print help} { ly_cmd "-h" "Usage:" } {} test arg_version {Print version} { ly_cmd "-v" "yangre" } {} cleanupTests