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