/
niceSOFT
/
tcl
Обзор
Документация
Войти
/
niceSOFT
/
tcl
Код
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
main
tools/addVerToFile.tcl
9 строк
217 B
dkf
Better version ID, trying to track down weird macOS problem
27 ноя 2020, 12:58
27 ноя 2020, 12:58
8c7898b
Код
Авторство
О чём код?
#!/usr/bin/env tclsh if {$argc < 1} { error "need a filename argument" } lassign $argv filename set f [open $filename a] puts $f "TCL_VERSION=[info tclversion]" puts $f "TCL_PATCHLEVEL=[info patchlevel]" close $f