| aPiecek | b5cda5e | 2023-06-29 11:26:28 +0200 | [diff] [blame] | 1 | source [expr {[info exists ::env(TESTS_DIR)] ? "$env(TESTS_DIR)/ly.tcl" : "ly.tcl"}] |
| 2 | |||||
| 3 | test arg_empty {Missing arguments} { | ||||
| 4 | ly_cmd_err "" "missing <string> parameter to process" | ||||
| 5 | } {} | ||||
| 6 | |||||
| 7 | test arg_wrong {Wrong argument} { | ||||
| 8 | ly_cmd_err "-j" "invalid option" | ||||
| 9 | } {} | ||||
| 10 | |||||
| 11 | test arg_help {Print help} { | ||||
| 12 | ly_cmd "-h" "Usage:" | ||||
| 13 | } {} | ||||
| 14 | |||||
| 15 | test arg_version {Print version} { | ||||
| 16 | ly_cmd "-v" "yangre" | ||||
| 17 | } {} | ||||
| 18 | |||||
| 19 | cleanupTests | ||||