anchor.diff:      rem Remove the XSpec output directories
       rem    Keep "..\test\" to minimize accident
       rem
  -    call :rmdir ..\test\catalog\xspec
  -    call :rmdir ..\test\xspec
  -    call :rmdir ..\tutorial\schematron\xspec
  -    call :rmdir ..\tutorial\xspec
  +    call :rmdir-if-exist ..\test\catalog\xspec
  +    call :rmdir          ..\test\xspec
  +    call :rmdir-if-exist ..\tutorial\schematron\xspec
  +    call :rmdir          ..\tutorial\xspec
   
       rem
       rem Remove the work directory
  
positive.code: 
  :del
      if exist %1 (
          del /q %1
          if errorlevel 1 call :failed "Failed to del: %~1"
      )
      goto :EOF
  
  
negative.code: rem Results log file
  rem
  set "RESULTS_FILE=%TEMP%\%~n0_results.log"
  if exist "%RESULTS_FILE%" call :del "%RESULTS_FILE%"
  
  rem
  rem Work directory
  