clean.tcl 908 B

12345678910111213141516171819202122232425262728293031323334
  1. #!/usr/bin/env tclsh
  2. #
  3. # Remove files created from previous builds.
  4. #
  5. # Copyright 2015-2017 OpenIndex.de.
  6. # Distributed under the MIT License.
  7. # See accompanying LICENSE.txt file or at http://opensource.org/licenses/MIT
  8. #
  9. # initialization
  10. source [file join [file normalize [file dirname $argv0]] init.tcl]
  11. puts ""
  12. puts "========================================================================="
  13. puts " $PROJECT $VERSION: cleanup"
  14. puts "========================================================================="
  15. puts ""
  16. if {[file exists $BUILD_DIR]} {
  17. file delete -force $BUILD_DIR
  18. }
  19. if {[file exists $TARGET_DIR]} {
  20. file delete -force $TARGET_DIR
  21. }
  22. set utilsBuildDir [file join $UTILS_DIR "build"]
  23. if {[file exists $utilsBuildDir]} {
  24. file delete -force $utilsBuildDir
  25. }
  26. set utilsTargetDir [file join $UTILS_DIR "target"]
  27. if {[file exists $utilsTargetDir]} {
  28. file delete -force $utilsTargetDir
  29. }