Revision: 108530 https://trac.macports.org/changeset/108530 Author: marius@macports.org Date: 2013-07-25 14:14:40 -0700 (Thu, 25 Jul 2013) Log Message: ----------- portdepends.test: added test file Added Paths: ----------- branches/gsoc13-tests/src/port1.0/tests/portdepends.test Added: branches/gsoc13-tests/src/port1.0/tests/portdepends.test =================================================================== --- branches/gsoc13-tests/src/port1.0/tests/portdepends.test (rev 0) +++ branches/gsoc13-tests/src/port1.0/tests/portdepends.test 2013-07-25 21:14:40 UTC (rev 108530) @@ -0,0 +1,32 @@ +package require tcltest 2 +namespace import tcltest::* + +set pwd [file normalize $argv0] +set pwd [eval file join {*}[lrange [file split $pwd] 0 end-1]] + +package require macports 1.0 +mportinit + +source ../portdepends.tcl + + +test validate_depends_options { + Validate depends unit test. +} -body { + set res [catch {portdepends::validate_depends_options target set {lib:test.val:value}}] + if {$res != 0} {return "FAIL: value lib:test.val:value not accepted"} + set res [catch {portdepends::validate_depends_options target set {bin:test.val:value}}] + if {$res != 0} {return "FAIL: value bin:test.val:value not accepted"} + set res [catch {portdepends::validate_depends_options target set {path:test:value}}] + if {$res != 0} {return "FAIL: value path:test:value not accepted"} + set res [catch {portdepends::validate_depends_options target set {port:test3}}] + if {$res != 0} {return "FAIL: value port:test3 not accepted"} + set res [catch {portdepends::validate_depends_options target set {lib:test}}] + if {$res != 1} {return "FAIL: invalid options lib:test accepted"} + return "Validate depends successful." +} -result "Validate depends successful." + +# test validate_depends_options_new + + +cleanupTests