Subversion Repositories pentevo

Rev

Blame | Last modification | View Log | Download | RSS feed

  1. @echo off
  2. if "%1"=="" goto main
  3.  
  4. cd %1
  5. type %1.doc | ..\..\addcr
  6. set ASCMD=@asflags
  7. ..\..\asl -i ..\..\include -L +t 31 %1.asm
  8. set ASCMD=
  9. set P2BINCMD=@p2binflags
  10. ..\..\p2bin -k -l 0 -r $-$ %1
  11. set P2BINCMD=
  12. ..\..\bincmp %1.bin %1.ori
  13. if errorlevel 1 goto errcond
  14. echo Test %1 succeeded!
  15. set SUMPASS=%SUMPASS%+
  16. echo %1 : OK >> ..\..\testlog
  17. :goon
  18. echo +---------------------------------------------------------------+
  19. type %1.lst | find "assembly" >> ..\..\testlog
  20. type %1.lst | find "Assemblierzeit" >> ..\..\testlog
  21. if exist %1.lst del %1.lst >nul
  22. if exist %1.inc del %1.inc >nul
  23. if exist %1.bin del %1.bin >nul
  24. cd ..
  25. goto end
  26.  
  27. :errcond
  28. echo Test %1 failed!
  29. set SUMFAIL=%SUMFAIL%-
  30. echo %1 : failed >> ..\..\testlog
  31. goto goon
  32.  
  33. :main
  34. if exist ..\addcr.exe goto nocomp
  35. echo Compiling 'addcr'...
  36. gcc -o ..\addcr.exe ..\addcr.c
  37. :nocomp
  38. if exist ..\bincmp.exe goto nocomp2
  39. echo Compiling 'bincmp'...
  40. gcc -o ..\bincmp.exe ..\bincmp.c
  41. :nocomp2
  42. echo executing self tests...
  43. echo "=================================================================" >..\testlog
  44. echo Summaric results: >> ..\testlog
  45. set SUMPASS=
  46. set SUMFAIL=
  47. for /D %%T in (t_*) do call testall %T%
  48. echo successes: %SUMPASS% >> ..\testlog
  49. echo failures: %SUMFAIL% >> ..\testlog
  50. type ..\testlog
  51.  
  52. :end
  53.