blob: 7c03ca6be23c095b7271e22230053eb05e025d05 [file] [log] [blame]
source [expr {[info exists ::env(TESTS_DIR)] ? "$env(TESTS_DIR)/interactive/ly.tcl" : "ly.tcl"}]
set mdir $::env(YANG_MODULES_DIR)
test clear_searchpath {searchpath is also deleted} {
-setup $ly_setup -cleanup $ly_cleanup -body {
ly_cmd "searchpath ./"
ly_cmd "clear"
ly_cmd "searchpath" "List of the searchpaths:" -ex
}}
test clear_make_implemented_once {clear --make-implemented} {
-setup $ly_setup -cleanup $ly_cleanup -body {
ly_cmd "clear -i"
ly_cmd "add $mdir/modmust.yang"
ly_cmd "list" "I modmust\r.*I modleaf"
}}
test clear_make_implemented_twice {clear -i -i} {
-setup $ly_setup -cleanup $ly_cleanup -body {
ly_cmd "clear -i -i"
ly_cmd "add $mdir/modmust.yang"
ly_cmd "list" "I modmust\r.*I modleaf"
}}
test clear_ietf_yang_library {clear --yang-library} {
-setup $ly_setup -cleanup $ly_cleanup -body {
# add models
ly_cmd "clear -y"
ly_cmd "list" "I ietf-yang-library"
}}
cleanupTests