blob: 973ae141ac614dd115fe3e6ed6efeecd1558763d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
if [ catch { load ./overload_copy[info sharedlibextension] Overload_copy} err_msg ] {
puts stderr "Could not load shared object:\n$err_msg"
}
Foo f
Foo g [f cget -this]
|