Artifact cc4d6e243b24bc8235563c04552a963523e0a33d:

• File build/test/tests/02-nameofexe.tcl — part of check-in [35e596ec3e] at 2010-10-03 21:03:17 on branch trunk — Added KitDLL to test suite (user: rkeene, size: 500) [annotate] [blame] [check-ins using]

#! /usr/bin/env tclsh

set outputname [lindex $argv 0]
set buildflags [split [lindex $argv 1] -]

# If we built a KitDLL, the executable name will be "./tclsh"
if {[lsearch -exact $buildflags "kitdll"] != -1} {
	set outputname "${outputname}-tclsh"
}

if {[info nameofexecutable] == $outputname} {
	exit 0
}

# Under Wine, the drive letter is added
if {[info nameofexecutable] == "Z:$outputname"} {
	exit 0
}

puts "Info NameOfExe: [info nameofexecutable]"
puts "Expected:       $outputname"

exit 1