anchor.diff:  
   set ARG0=%0
   set RUN=call :Run
  -set RUNX=%COMSPEC% /c %ARG0% %VERBOSE% --call Run
  -set RETURN=goto :eof
  +set RETURN=exit /b
   
   :# FOREACHLINE macro. (Change delimiter to none to catch the whole lines.)
   set FOREACHLINE=for /f "delims=" 
  
positive.code: 
  :# Locate and start the Tcl interpreter
  :Start
  set TCLSH=""
  for /f "delims=" %%p in ('%ARG0% %VERBOSE% -f') do set TCLSH="%%p"
  :# Note: The set command above fails without the quotes around %%p. Why?!?
  :#       (Is it linked to the parenthesis in the "C:\Program Files (x64)" path?)
  if .%TCLSH%.==."". (
    echo>&2 Failure. No tclsh interpreter found.
    exit /b 1
  )
  :# Start it
  %TCLSH% %*
  goto :eof
  :# End of the PowerShell comment section protecting the batch section.
  #>
  
  
negative.code: :#   2014-05-13 JFL Fixed the setting of variable PATHEXT.		      #
  :#   2014-06-23 JFL Make sure the local path includes the Tcl's bin directory.#
  :#                  Bug fix: Avoid adding trailing spaces to variable PATHEXT.#
  :#   2018-11-19 JFL Use the improved FindTclsh routine from TclSetup.bat.     #
  :#                  Removed options -s and -t.                                #
  :#                                                                            #
  :#          Copyright 2016 Hewlett Packard Enterprise Development LP         #
  :# Licensed under the Apache 2.0 license  www.apache.org/licenses/LICENSE-2.0 #
  