Subversion Repositories Kolibri OS

Rev

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

  1. @echo off
  2.  
  3. rem „«ï ᡮન ¨£àë ­¥®¡å®¤¨¬® ¢ ¯¥à¥¬¥­­®© UNITS (®¯à¥¤¥«¥­  ­¨¦¥)
  4. rem 㪠§ âì à á¯®«®¦¥­¨¥ ¯ ¯ª¨, ¢ ª®â®à®© ­ å®¤ïâáï ®âª®¬¯¨«¨à®¢ ­­ë¥ ¬®¤ã«¨
  5. rem RTL ¤«ï KolibriOS.  ¯à¨¬¥à, ¥á«¨ ¨á室­¨ª¨ RTL ­ å®¤ïâáï ¢ ¯ ¯ª¥ my/rtl,
  6. rem ⮠ᮡ࠭­ë¥ ¬®¤ã«¨ RTL - ᪮॥ ¢á¥£® ¢ my/units. Œ®¦¥â ®ª § âìáï
  7. rem ¤®áâ â®ç­ë¬ ¯à®áâ® ¯¥à¥­¥á⨠íâã ¯ ¯ªã (lrl) ¢ ¤¨à¥ªâ®à¨î my.
  8.  
  9. rem ’ ª ¦¥, ¤«ï ᡮન, ¢ ¬ ¯®­ ¤®¡¨âáï ã⨫¨â  exe2kos.exe ¨ FreePascal 2.2.0.
  10.  
  11.  
  12. set NAME=lrl
  13. set NAMEEXE=%NAME%.exe
  14. set NAMEKEX=%NAME%.kex
  15.  
  16. set BUILD=-FUbuild
  17. set UNITS=-Fu../units
  18.  
  19. fpc %NAME%.pp -n -Twin32 -Se5 -XXs -Sg -O3pPENTIUM3 -CfSSE -WB0 %BUILD% %UNITS%
  20. if errorlevel 1 goto error
  21.  
  22. exe2kos.exe %NAMEEXE% %NAMEKEX%
  23. del %NAMEEXE%
  24. move %NAMEKEX% bin
  25. goto end
  26.  
  27. :error
  28. echo An error occured while building %NAME%
  29.  
  30. :end
  31.