Artifact Content

Artifact 63098e1805c3ddab5c26c43aa7dc3052368c68ea:


#! /usr/bin/env tclsh

set newinterp [interp create]

if {[string match "interp*" $newinterp]} {
	exit 0
}

puts "Interp Name: $newinterp"
puts "Expected:    interp*"

exit 1