Maybe this? (Removed previous edits.)
proc E364xA::Connect "{VisaAlias {$E364xA::DefaultAlias}}" {
::VISA::Connect $VisaAlias
}
Test
Here's a simplified test:
set def "hello, world!"
proc test "{var {$def}}" {
puts $var
}
test
Outputting:
hello, world!