1 2 3 4 5 6 7 8 9 10 11 12 13
proc winsup_version {} { global env global runtime_root clone_output "\n[exec grep -a ^%%% $runtime_root/cygwin0.dll]\n" if { [info exists env(CYGWIN)] } { clone_output "CYGWIN=$env(CYGWIN)\n" } else { clone_output "CYGWIN=\n" } } proc winsup_exit {} { }