cktclsh.sh 315 B

123456789101112
  1. # Fail with an error if the TCLSH named in $2 is not tclsh version $1 or later.
  2. #
  3. echo "set vers $1" >cktclsh$1.tcl
  4. echo 'if {$tcl_version<$vers} {exit 1}' >>cktclsh$1.tcl
  5. if ! $2 cktclsh$1.tcl
  6. then
  7. echo "ERROR: This makefile target requires tclsh $1 or later."
  8. rm cktclsh$1.tcl
  9. exit 1
  10. fi
  11. rm cktclsh$1.tcl