Subversion Repositories pentevo

Rev

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

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