# -*- tcl -*- # peg_import.test: tests for the pt::peg::import package. # # Copyright (c) 2009-2019 by Andreas Kupries # All rights reserved. # ------------------------------------------------------------------------- source [file join [ file dirname [file dirname [file join [pwd] [info script]]] ] devtools testutilities.tcl] testsNeedTcl 8.5 testsNeedTcltest 2 support { use fileutil/fileutil.tcl fileutil ;# tests/common use snit/snit.tcl snit use fileutil/paths.tcl fileutil::paths use pluginmgr/pluginmgr.tcl pluginmgr useLocal pt_pexpression.tcl pt::pe useLocal pt_pegrammar.tcl pt::peg source [localPath tests/common] } testing { useLocalKeep pt_peg_import.tcl pt::peg::import } # ------------------------------------------------------------------------- setup_plugins set mytestdir data # ------------------------------------------------------------------------- source [localPath tests/pt_peg_import.tests] #---------------------------------------------------------------------- testsuiteCleanup return