LINUX.ORG.RU

История изменений

Исправление MKuznetsov, (текущая версия) :

можно ещё так

proc nullVar { name } {
  try { 
     uplevel set $name
  } on error msg { 
     return {}
  }
}
и даже тут «return {}» можно смело убрать. После исключения в TclResult и так пусто.

Исходная версия MKuznetsov, :

можно ещё так

proc nullVar { name } {
  try { 
     uplevel set $name
  } on error msg { 
     return {}
  }
}