#!/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 if test -r AddErrInfo.3; then rm -f Tcl_AddErrorInfo.3 ln AddErrInfo.3 Tcl_AddErrorInfo.3 fi if test -r Alloc.3; then rm -f Tcl_Alloc.3 ln Alloc.3 Tcl_Alloc.3 fi if test -r AllowExc.3; then rm -f Tcl_AllowExceptions.3 ln AllowExc.3 Tcl_AllowExceptions.3 fi if test -r AppInit.3; then rm -f Tcl_AppInit.3 ln AppInit.3 Tcl_AppInit.3 fi if test -r SetResult.3; then rm -f Tcl_AppendElement.3 ln SetResult.3 Tcl_AppendElement.3 fi if test -r SetResult.3; then rm -f Tcl_AppendResult.3 ln SetResult.3 Tcl_AppendResult.3 fi if test -r Async.3; then rm -f Tcl_AsyncCreate.3 ln Async.3 Tcl_AsyncCreate.3 fi if test -r Async.3; then rm -f Tcl_AsyncDelete.3 ln Async.3 Tcl_AsyncDelete.3 fi if test -r Async.3; then rm -f Tcl_AsyncInvoke.3 ln Async.3 Tcl_AsyncInvoke.3 fi if test -r Async.3; then rm -f Tcl_AsyncMark.3 ln Async.3 Tcl_AsyncMark.3 fi if test -r BackgdErr.3; then rm -f Tcl_BackgroundError.3 ln BackgdErr.3 Tcl_BackgroundError.3 fi if test -r Backslash.3; then rm -f Tcl_Backslash.3 ln Backslash.3 Tcl_Backslash.3 fi if test -r CallDel.3; then rm -f Tcl_CallWhenDeleted.3 ln CallDel.3 Tcl_CallWhenDeleted.3 fi if test -r DoWhenIdle.3; then rm -f Tcl_CancelIdleCall.3 ln DoWhenIdle.3 Tcl_CancelIdleCall.3 fi if test -r OpenFileChnl.3; then rm -f Tcl_Close.3 ln OpenFileChnl.3 Tcl_Close.3 fi if test -r CmdCmplt.3; then rm -f Tcl_CommandComplete.3 ln CmdCmplt.3 Tcl_CommandComplete.3 fi if test -r Concat.3; then rm -f Tcl_Concat.3 ln Concat.3 Tcl_Concat.3 fi if test -r SplitList.3; then rm -f Tcl_ConvertElement.3 ln SplitList.3 Tcl_ConvertElement.3 fi if test -r CrtSlave.3; then rm -f Tcl_CreateAlias.3 ln CrtSlave.3 Tcl_CreateAlias.3 fi if test -r CrtChannel.3; then rm -f Tcl_CreateChannel.3 ln CrtChannel.3 Tcl_CreateChannel.3 fi if test -r CrtChnlHdlr.3; then rm -f Tcl_CreateChannelHandler.3 ln CrtChnlHdlr.3 Tcl_CreateChannelHandler.3 fi if test -r CrtCloseHdlr.3; then rm -f Tcl_CreateCloseHandler.3 ln CrtCloseHdlr.3 Tcl_CreateCloseHandler.3 fi if test -r CrtCommand.3; then rm -f Tcl_CreateCommand.3 ln CrtCommand.3 Tcl_CreateCommand.3 fi if test -r Notifier.3; then rm -f Tcl_CreateEventSource.3 ln Notifier.3 Tcl_CreateEventSource.3 fi if test -r Exit.3; then rm -f Tcl_CreateExitHandler.3 ln Exit.3 Tcl_CreateExitHandler.3 fi if test -r CrtFileHdlr.3; then rm -f Tcl_CreateFileHandler.3 ln CrtFileHdlr.3 Tcl_CreateFileHandler.3 fi if test -r Hash.3; then rm -f Tcl_CreateHashEntry.3 ln Hash.3 Tcl_CreateHashEntry.3 fi if test -r CrtInterp.3; then rm -f Tcl_CreateInterp.3 ln CrtInterp.3 Tcl_CreateInterp.3 fi if test -r CrtMathFnc.3; then rm -f Tcl_CreateMathFunc.3 ln CrtMathFnc.3 Tcl_CreateMathFunc.3 fi if test -r CrtModalTmt.3; then rm -f Tcl_CreateModalTimeout.3 ln CrtModalTmt.3 Tcl_CreateModalTimeout.3 fi if test -r CrtSlave.3; then rm -f Tcl_CreateSlave.3 ln CrtSlave.3 Tcl_CreateSlave.3 fi if test -r CrtTimerHdlr.3; then rm -f Tcl_CreateTimerHandler.3 ln CrtTimerHdlr.3 Tcl_CreateTimerHandler.3 fi if test -r CrtTrace.3; then rm -f Tcl_CreateTrace.3 ln CrtTrace.3 Tcl_CreateTrace.3 fi if test -r DString.3; then rm -f Tcl_DStringAppend.3 ln DString.3 Tcl_DStringAppend.3 fi if test -r DString.3; then rm -f Tcl_DStringAppendElement.3 ln DString.3 Tcl_DStringAppendElement.3 fi if test -r DString.3; then rm -f Tcl_DStringEndSublist.3 ln DString.3 Tcl_DStringEndSublist.3 fi if test -r DString.3; then rm -f Tcl_DStringFree.3 ln DString.3 Tcl_DStringFree.3 fi if test -r DString.3; then rm -f Tcl_DStringGetResult.3 ln DString.3 Tcl_DStringGetResult.3 fi if test -r DString.3; then rm -f Tcl_DStringInit.3 ln DString.3 Tcl_DStringInit.3 fi if test -r DString.3; then rm -f Tcl_DStringLength.3 ln DString.3 Tcl_DStringLength.3 fi if test -r DString.3; then rm -f Tcl_DStringResult.3 ln DString.3 Tcl_DStringResult.3 fi if test -r DString.3; then rm -f Tcl_DStringSetLength.3 ln DString.3 Tcl_DStringSetLength.3 fi if test -r DString.3; then rm -f Tcl_DStringStartSublist.3 ln DString.3 Tcl_DStringStartSublist.3 fi if test -r DString.3; then rm -f Tcl_DStringValue.3 ln DString.3 Tcl_DStringValue.3 fi if test -r AssocData.3; then rm -f Tcl_DeleteAssocData.3 ln AssocData.3 Tcl_DeleteAssocData.3 fi if test -r CrtChnlHdlr.3; then rm -f Tcl_DeleteChannelHandler.3 ln CrtChnlHdlr.3 Tcl_DeleteChannelHandler.3 fi if test -r CrtCloseHdlr.3; then rm -f Tcl_DeleteCloseHandler.3 ln CrtCloseHdlr.3 Tcl_DeleteCloseHandler.3 fi if test -r CrtCommand.3; then rm -f Tcl_DeleteCommand.3 ln CrtCommand.3 Tcl_DeleteCommand.3 fi if test -r Notifier.3; then rm -f Tcl_DeleteEventSource.3 ln Notifier.3 Tcl_DeleteEventSource.3 fi if test -r Exit.3; then rm -f Tcl_DeleteExitHandler.3 ln Exit.3 Tcl_DeleteExitHandler.3 fi if test -r CrtFileHdlr.3; then rm -f Tcl_DeleteFileHandler.3 ln CrtFileHdlr.3 Tcl_DeleteFileHandler.3 fi if test -r Hash.3; then rm -f Tcl_DeleteHashEntry.3 ln Hash.3 Tcl_DeleteHashEntry.3 fi if test -r Hash.3; then rm -f Tcl_DeleteHashTable.3 ln Hash.3 Tcl_DeleteHashTable.3 fi if test -r CrtInterp.3; then rm -f Tcl_DeleteInterp.3 ln CrtInterp.3 Tcl_DeleteInterp.3 fi if test -r CrtModalTmt.3; then rm -f Tcl_DeleteModalTimeout.3 ln CrtModalTmt.3 Tcl_DeleteModalTimeout.3 fi if test -r CrtTimerHdlr.3; then rm -f Tcl_DeleteTimerHandler.3 ln CrtTimerHdlr.3 Tcl_DeleteTimerHandler.3 fi if test -r CrtTrace.3; then rm -f Tcl_DeleteTrace.3 ln CrtTrace.3 Tcl_DeleteTrace.3 fi if test -r DetachPids.3; then rm -f Tcl_DetachPids.3 ln DetachPids.3 Tcl_DetachPids.3 fi if test -r DoOneEvent.3; then rm -f Tcl_DoOneEvent.3 ln DoOneEvent.3 Tcl_DoOneEvent.3 fi if test -r DoWhenIdle.3; then rm -f Tcl_DoWhenIdle.3 ln DoWhenIdle.3 Tcl_DoWhenIdle.3 fi if test -r CallDel.3; then rm -f Tcl_DontCallWhenDeleted.3 ln CallDel.3 Tcl_DontCallWhenDeleted.3 fi if test -r OpenFileChnl.3; then rm -f Tcl_Eof.3 ln OpenFileChnl.3 Tcl_Eof.3 fi if test -r Eval.3; then rm -f Tcl_Eval.3 ln Eval.3 Tcl_Eval.3 fi if test -r Eval.3; then rm -f Tcl_EvalFile.3 ln Eval.3 Tcl_EvalFile.3 fi if test -r Preserve.3; then rm -f Tcl_EventuallyFree.3 ln Preserve.3 Tcl_EventuallyFree.3 fi if test -r Exit.3; then rm -f Tcl_Exit.3 ln Exit.3 Tcl_Exit.3 fi if test -r ExprLong.3; then rm -f Tcl_ExprBoolean.3 ln ExprLong.3 Tcl_ExprBoolean.3 fi if test -r ExprLong.3; then rm -f Tcl_ExprDouble.3 ln ExprLong.3 Tcl_ExprDouble.3 fi if test -r ExprLong.3; then rm -f Tcl_ExprLong.3 ln ExprLong.3 Tcl_ExprLong.3 fi if test -r ExprLong.3; then rm -f Tcl_ExprString.3 ln ExprLong.3 Tcl_ExprString.3 fi if test -r Notifier.3; then rm -f Tcl_FileReady.3 ln Notifier.3 Tcl_FileReady.3 fi if test -r FindExec.3; then rm -f Tcl_FindExecutable.3 ln FindExec.3 Tcl_FindExecutable.3 fi if test -r Hash.3; then rm -f Tcl_FindHashEntry.3 ln Hash.3 Tcl_FindHashEntry.3 fi if test -r Hash.3; then rm -f Tcl_FirstHashEntry.3 ln Hash.3 Tcl_FirstHashEntry.3 fi if test -r OpenFileChnl.3; then rm -f Tcl_Flush.3 ln OpenFileChnl.3 Tcl_Flush.3 fi if test -r Alloc.3; then rm -f Tcl_Free.3 ln Alloc.3 Tcl_Free.3 fi if test -r GetFile.3; then rm -f Tcl_FreeFile.3 ln GetFile.3 Tcl_FreeFile.3 fi if test -r CrtSlave.3; then rm -f Tcl_GetAlias.3 ln CrtSlave.3 Tcl_GetAlias.3 fi if test -r CrtSlave.3; then rm -f Tcl_GetAliases.3 ln CrtSlave.3 Tcl_GetAliases.3 fi if test -r AssocData.3; then rm -f Tcl_GetAssocData.3 ln AssocData.3 Tcl_GetAssocData.3 fi if test -r GetInt.3; then rm -f Tcl_GetBoolean.3 ln GetInt.3 Tcl_GetBoolean.3 fi if test -r CrtChannel.3; then rm -f Tcl_GetChannelBufferSize.3 ln CrtChannel.3 Tcl_GetChannelBufferSize.3 fi if test -r CrtChannel.3; then rm -f Tcl_GetChannelFile.3 ln CrtChannel.3 Tcl_GetChannelFile.3 fi if test -r CrtChannel.3; then rm -f Tcl_GetChannelInstanceData.3 ln CrtChannel.3 Tcl_GetChannelInstanceData.3 fi if test -r CrtChannel.3; then rm -f Tcl_GetChannelName.3 ln CrtChannel.3 Tcl_GetChannelName.3 fi if test -r OpenFileChnl.3; then rm -f Tcl_GetChannelOption.3 ln OpenFileChnl.3 Tcl_GetChannelOption.3 fi if test -r CrtChannel.3; then rm -f Tcl_GetChannelType.3 ln CrtChannel.3 Tcl_GetChannelType.3 fi if test -r CrtCommand.3; then rm -f Tcl_GetCommandInfo.3 ln CrtCommand.3 Tcl_GetCommandInfo.3 fi if test -r GetInt.3; then rm -f Tcl_GetDouble.3 ln GetInt.3 Tcl_GetDouble.3 fi if test -r SetErrno.3; then rm -f Tcl_GetErrno.3 ln SetErrno.3 Tcl_GetErrno.3 fi if test -r GetFile.3; then rm -f Tcl_GetFile.3 ln GetFile.3 Tcl_GetFile.3 fi if test -r GetFile.3; then rm -f Tcl_GetFileInfo.3 ln GetFile.3 Tcl_GetFileInfo.3 fi if test -r Hash.3; then rm -f Tcl_GetHashKey.3 ln Hash.3 Tcl_GetHashKey.3 fi if test -r Hash.3; then rm -f Tcl_GetHashValue.3 ln Hash.3 Tcl_GetHashValue.3 fi if test -r GetInt.3; then rm -f Tcl_GetInt.3 ln GetInt.3 Tcl_GetInt.3 fi if test -r CrtSlave.3; then rm -f Tcl_GetMaster.3 ln CrtSlave.3 Tcl_GetMaster.3 fi if test -r GetOpnFl.3; then rm -f Tcl_GetOpenFile.3 ln GetOpnFl.3 Tcl_GetOpenFile.3 fi if test -r SplitPath.3; then rm -f Tcl_GetPathType.3 ln SplitPath.3 Tcl_GetPathType.3 fi if test -r CrtSlave.3; then rm -f Tcl_GetSlave.3 ln CrtSlave.3 Tcl_GetSlave.3 fi if test -r CrtSlave.3; then rm -f Tcl_GetSlaves.3 ln CrtSlave.3 Tcl_GetSlaves.3 fi if test -r GetStdChan.3; then rm -f Tcl_GetStdChannel.3 ln GetStdChan.3 Tcl_GetStdChannel.3 fi if test -r SetVar.3; then rm -f Tcl_GetVar.3 ln SetVar.3 Tcl_GetVar.3 fi if test -r SetVar.3; then rm -f Tcl_GetVar2.3 ln SetVar.3 Tcl_GetVar2.3 fi if test -r OpenFileChnl.3; then rm -f Tcl_Gets.3 ln OpenFileChnl.3 Tcl_Gets.3 fi if test -r Eval.3; then rm -f Tcl_GlobalEval.3 ln Eval.3 Tcl_GlobalEval.3 fi if test -r Hash.3; then rm -f Tcl_HashStats.3 ln Hash.3 Tcl_HashStats.3 fi if test -r Hash.3; then rm -f Tcl_InitHashTable.3 ln Hash.3 Tcl_InitHashTable.3 fi if test -r OpenFileChnl.3; then rm -f Tcl_InputBlocked.3 ln OpenFileChnl.3 Tcl_InputBlocked.3 fi if test -r Interp.3; then rm -f Tcl_Interp.3 ln Interp.3 Tcl_Interp.3 fi if test -r CrtInterp.3; then rm -f Tcl_InterpDeleted.3 ln CrtInterp.3 Tcl_InterpDeleted.3 fi if test -r CrtSlave.3; then rm -f Tcl_IsSafe.3 ln CrtSlave.3 Tcl_IsSafe.3 fi if test -r SplitPath.3; then rm -f Tcl_JoinPath.3 ln SplitPath.3 Tcl_JoinPath.3 fi if test -r LinkVar.3; then rm -f Tcl_LinkVar.3 ln LinkVar.3 Tcl_LinkVar.3 fi if test -r CrtSlave.3; then rm -f Tcl_MakeSafe.3 ln CrtSlave.3 Tcl_MakeSafe.3 fi if test -r SplitList.3; then rm -f Tcl_Merge.3 ln SplitList.3 Tcl_Merge.3 fi if test -r Hash.3; then rm -f Tcl_NextHashEntry.3 ln Hash.3 Tcl_NextHashEntry.3 fi if test -r OpenFileChnl.3; then rm -f Tcl_OpenCommandChannel.3 ln OpenFileChnl.3 Tcl_OpenCommandChannel.3 fi if test -r OpenFileChnl.3; then rm -f Tcl_OpenFileChannel.3 ln OpenFileChnl.3 Tcl_OpenFileChannel.3 fi if test -r OpenTcp.3; then rm -f Tcl_OpenTcpClient.3 ln OpenTcp.3 Tcl_OpenTcpClient.3 fi if test -r OpenTcp.3; then rm -f Tcl_OpenTcpServer.3 ln OpenTcp.3 Tcl_OpenTcpServer.3 fi if test -r PkgRequire.3; then rm -f Tcl_PkgProvide.3 ln PkgRequire.3 Tcl_PkgProvide.3 fi if test -r PkgRequire.3; then rm -f Tcl_PkgRequire.3 ln PkgRequire.3 Tcl_PkgRequire.3 fi if test -r AddErrInfo.3; then rm -f Tcl_PosixError.3 ln AddErrInfo.3 Tcl_PosixError.3 fi if test -r Preserve.3; then rm -f Tcl_Preserve.3 ln Preserve.3 Tcl_Preserve.3 fi if test -r PrintDbl.3; then rm -f Tcl_PrintDouble.3 ln PrintDbl.3 Tcl_PrintDouble.3 fi if test -r Notifier.3; then rm -f Tcl_QueueEvent.3 ln Notifier.3 Tcl_QueueEvent.3 fi if test -r OpenFileChnl.3; then rm -f Tcl_Read.3 ln OpenFileChnl.3 Tcl_Read.3 fi if test -r Alloc.3; then rm -f Tcl_Realloc.3 ln Alloc.3 Tcl_Realloc.3 fi if test -r DetachPids.3; then rm -f Tcl_ReapDetachedProcs.3 ln DetachPids.3 Tcl_ReapDetachedProcs.3 fi if test -r RecordEval.3; then rm -f Tcl_RecordAndEval.3 ln RecordEval.3 Tcl_RecordAndEval.3 fi if test -r RegExp.3; then rm -f Tcl_RegExpCompile.3 ln RegExp.3 Tcl_RegExpCompile.3 fi if test -r RegExp.3; then rm -f Tcl_RegExpExec.3 ln RegExp.3 Tcl_RegExpExec.3 fi if test -r RegExp.3; then rm -f Tcl_RegExpMatch.3 ln RegExp.3 Tcl_RegExpMatch.3 fi if test -r RegExp.3; then rm -f Tcl_RegExpRange.3 ln RegExp.3 Tcl_RegExpRange.3 fi if test -r Preserve.3; then rm -f Tcl_Release.3 ln Preserve.3 Tcl_Release.3 fi if test -r SetResult.3; then rm -f Tcl_ResetResult.3 ln SetResult.3 Tcl_ResetResult.3 fi if test -r SplitList.3; then rm -f Tcl_ScanElement.3 ln SplitList.3 Tcl_ScanElement.3 fi if test -r OpenFileChnl.3; then rm -f Tcl_Seek.3 ln OpenFileChnl.3 Tcl_Seek.3 fi if test -r AssocData.3; then rm -f Tcl_SetAssocData.3 ln AssocData.3 Tcl_SetAssocData.3 fi if test -r CrtChannel.3; then rm -f Tcl_SetChannelBufferSize.3 ln CrtChannel.3 Tcl_SetChannelBufferSize.3 fi if test -r OpenFileChnl.3; then rm -f Tcl_SetChannelOption.3 ln OpenFileChnl.3 Tcl_SetChannelOption.3 fi if test -r CrtCommand.3; then rm -f Tcl_SetCommandInfo.3 ln CrtCommand.3 Tcl_SetCommandInfo.3 fi if test -r CrtChannel.3; then rm -f Tcl_SetDefaultTranslation.3 ln CrtChannel.3 Tcl_SetDefaultTranslation.3 fi if test -r SetErrno.3; then rm -f Tcl_SetErrno.3 ln SetErrno.3 Tcl_SetErrno.3 fi if test -r AddErrInfo.3; then rm -f Tcl_SetErrorCode.3 ln AddErrInfo.3 Tcl_SetErrorCode.3 fi if test -r Hash.3; then rm -f Tcl_SetHashValue.3 ln Hash.3 Tcl_SetHashValue.3 fi if test -r Notifier.3; then rm -f Tcl_SetMaxBlockTime.3 ln Notifier.3 Tcl_SetMaxBlockTime.3 fi if test -r SetRecLmt.3; then rm -f Tcl_SetRecursionLimit.3 ln SetRecLmt.3 Tcl_SetRecursionLimit.3 fi if test -r SetResult.3; then rm -f Tcl_SetResult.3 ln SetResult.3 Tcl_SetResult.3 fi if test -r GetStdChan.3; then rm -f Tcl_SetStdChannel.3 ln GetStdChan.3 Tcl_SetStdChannel.3 fi if test -r SetVar.3; then rm -f Tcl_SetVar.3 ln SetVar.3 Tcl_SetVar.3 fi if test -r SetVar.3; then rm -f Tcl_SetVar2.3 ln SetVar.3 Tcl_SetVar2.3 fi if test -r Sleep.3; then rm -f Tcl_Sleep.3 ln Sleep.3 Tcl_Sleep.3 fi if test -r SplitList.3; then rm -f Tcl_SplitList.3 ln SplitList.3 Tcl_SplitList.3 fi if test -r SplitPath.3; then rm -f Tcl_SplitPath.3 ln SplitPath.3 Tcl_SplitPath.3 fi if test -r StaticPkg.3; then rm -f Tcl_StaticPackage.3 ln StaticPkg.3 Tcl_StaticPackage.3 fi if test -r StrMatch.3; then rm -f Tcl_StringMatch.3 ln StrMatch.3 Tcl_StringMatch.3 fi if test -r OpenFileChnl.3; then rm -f Tcl_Tell.3 ln OpenFileChnl.3 Tcl_Tell.3 fi if test -r TraceVar.3; then rm -f Tcl_TraceVar.3 ln TraceVar.3 Tcl_TraceVar.3 fi if test -r TraceVar.3; then rm -f Tcl_TraceVar2.3 ln TraceVar.3 Tcl_TraceVar2.3 fi if test -r Translate.3; then rm -f Tcl_TranslateFileName.3 ln Translate.3 Tcl_TranslateFileName.3 fi if test -r LinkVar.3; then rm -f Tcl_UnlinkVar.3 ln LinkVar.3 Tcl_UnlinkVar.3 fi if test -r SetVar.3; then rm -f Tcl_UnsetVar.3 ln SetVar.3 Tcl_UnsetVar.3 fi if test -r SetVar.3; then rm -f Tcl_UnsetVar2.3 ln SetVar.3 Tcl_UnsetVar2.3 fi if test -r TraceVar.3; then rm -f Tcl_UntraceVar.3 ln TraceVar.3 Tcl_UntraceVar.3 fi if test -r TraceVar.3; then rm -f Tcl_UntraceVar2.3 ln TraceVar.3 Tcl_UntraceVar2.3 fi if test -r UpVar.3; then rm -f Tcl_UpVar.3 ln UpVar.3 Tcl_UpVar.3 fi if test -r UpVar.3; then rm -f Tcl_UpVar2.3 ln UpVar.3 Tcl_UpVar2.3 fi if test -r LinkVar.3; then rm -f Tcl_UpdateLinkedVar.3 ln LinkVar.3 Tcl_UpdateLinkedVar.3 fi if test -r Eval.3; then rm -f Tcl_VarEval.3 ln Eval.3 Tcl_VarEval.3 fi if test -r TraceVar.3; then rm -f Tcl_VarTraceInfo.3 ln TraceVar.3 Tcl_VarTraceInfo.3 fi if test -r TraceVar.3; then rm -f Tcl_VarTraceInfo2.3 ln TraceVar.3 Tcl_VarTraceInfo2.3 fi if test -r Notifier.3; then rm -f Tcl_WaitForEvent.3 ln Notifier.3 Tcl_WaitForEvent.3 fi if test -r Notifier.3; then rm -f Tcl_WatchFile.3 ln Notifier.3 Tcl_WatchFile.3 fi if test -r OpenFileChnl.3; then rm -f Tcl_Write.3 ln OpenFileChnl.3 Tcl_Write.3 fi if test -r pkgMkIndex.n; then rm -f pkg_mkIndex.n ln pkgMkIndex.n pkg_mkIndex.n fi exit 0