1 files changed, 0 insertions, 71 deletions
diff --git a/unix/mkLinks.tcl b/unix/mkLinks.tcl
deleted file mode 100644
index f9afcb2..0000000
--- a/unix/mkLinks.tcl
+++ /dev/null
@@ -1,71 +0,0 @@
-#!/bin/sh
-# mkLinks.tcl -- 
-#	This generates the mkLinks script
-# \
-exec tclsh "$0" ${1+"$@"}
-
-puts stdout \
-{#!/bin/sh
-# This script is invoked when installing manual entries.  It generates
-# additional links to manual entries, corresponding to the procedure
-# and command names described by the manual entry.  For example, the
-# Tcl manual entry Hash.3 describes procedures Tcl_InitHashTable,
-# Tcl_CreateHashEntry, and many more.  This script will make hard
-# links so that Tcl_InitHashTable.3, Tcl_CreateHashEntry.3, and so
-# on all refer to Hash.3 in the installed directory.
-#
-# Because of the length of command and procedure names, this mechanism
-# only works on machines that support file names longer than 14 characters.
-# This script checks to see if long file names are supported, and it
-# doesn't make any links if they are not.
-#
-# The script takes one argument, which is the name of the directory
-# where the manual entries have been installed.
-
-if test $# != 1; then
-    echo "Usage: mkLinks dir"
-    exit 1
-fi
-
-cd $1
-echo foo > xyzzyTestingAVeryLongFileName.foo
-x=`echo xyzzyTe*`
-rm xyzzyTe*
-if test "$x" != "xyzzyTestingAVeryLongFileName.foo"; then
-    exit
-fi
-}
-
-foreach file $argv {
-    set in [open $file]
-    set tail [file tail $file]
-    set ext [file extension $file]
-    set state begin
-    while {[gets $in line] >= 0} {
-	switch $state {
-	    begin {
-		if {[regexp "^.SH NAME" $line]} {
-		    set state name
-		}
-			    }
-					name {
-	    regsub {\\-.*} $line {} line
-	    foreach name [split $line ,] {
-		regsub -all { } $name "" name
-		if {[string compare $tail $name$ext] != 0} {
-		    puts "if test -r $tail; then"
-		    puts "    rm -f $name$ext"
-		    puts "    ln $tail $name$ext"
-		    puts "fi"
-		}
-	    }
-	    set state end
-	}
-	end {
-	    break
-	}
-	}
-    }
-    close $in
-}
-puts "exit 0"