mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-12-16 04:30:35 +01:00
* got rid of PPC386.CFG dependency
This commit is contained in:
Tomas Hajny
parent
094d7d1829
commit
075dd0424b
332
base/os2snap.bat
332
base/os2snap.bat
@ -6,28 +6,36 @@ rem *** Batch file for creating of FPC snapshot for OS/2.
|
||||
rem *** FPCDIR variable must be set to your base FPC directory and
|
||||
rem *** must _not_ contain forward slashes (only backslashes allowed).
|
||||
rem *** Please, note, that you need to have enough space for environment
|
||||
rem *** variables to run this batch (don't try to run it under Norton
|
||||
rem *** variables to run this batch - something like 2 kB should be enough
|
||||
rem *** unless path to FPC source is long (don't try to run it under Norton
|
||||
rem *** Commander or similar programs under DOS with COMMAND.COM as shell).
|
||||
rem *** Your compiler (PPC386.EXE per default) and AS.EXE must be somewhere
|
||||
rem *** on PATH (unless you set path to them explicitly using FPCTOOLS
|
||||
rem *** variable, which must end with \ if present).
|
||||
rem *** variable, which must end with \ if present). However, be sure which
|
||||
rem *** version of AS.EXE, etc. gets called if several such files exist.
|
||||
rem *** One of the following parameters may be specified: rtl, compiler,
|
||||
rem *** both, cycle and snapshot - "snapshot" being the default, optionally
|
||||
rem *** followed by second parameter "debug" causing debugging symbols
|
||||
rem *** not to be stripped from the created compiler (parameter _must_ be
|
||||
rem *** in lowercase to be recognized correctly, unless running under 4dos).
|
||||
rem *** both, cycle and snapshot ("snapshot" being the default), optionally
|
||||
rem *** followed by a second parameter "debug" (causing debugging symbols
|
||||
rem *** not to be stripped from the created compiler), or "release" (code
|
||||
rem *** optimization, debug info stripped out). Parameters _must_ be in
|
||||
rem *** lowercase to be recognized correctly, unless running under 4dos).
|
||||
rem *** Meaning of parameters:
|
||||
rem *** rtl .......... RTL only, no snapshot created
|
||||
rem *** compiler ..... compiler only, no snapshot created
|
||||
rem *** both ......... both RTL and compiler, no snapshot created
|
||||
rem *** rtl .......... RTL only, _no_ snapshot created
|
||||
rem *** compiler ..... compiler only, _no_ snapshot created
|
||||
rem *** both ......... both RTL and compiler, _no_ snapshot created
|
||||
rem *** snapshot ..... both RTL and compiler, snapshot _is_ created
|
||||
rem *** cycle ........ RTL and compiler compiled, the resulting compiler
|
||||
rem *** is then copied to /BIN/OS2 (backing up previous
|
||||
rem *** version to ppos2.old) and used to compile both RTL and
|
||||
rem *** compiler again, and then finally snapshot is created
|
||||
rem *** is then copied to %FPCTOOLS% (BIN\OS2 by default)
|
||||
rem *** backing up possible previous version to ppos2.x),
|
||||
rem *** the whole procedure is started again (RTL is compiled
|
||||
rem *** with the new compiler version this time) and after
|
||||
rem *** another cycle (to make sure the new compiler works
|
||||
rem *** correctly) the snapshot is finally created
|
||||
rem *** PPC386.EXE is used for the compilation (for the first one only with
|
||||
rem *** "cycle"), unless a different compiler name (e.g. PPOS2.EXE)
|
||||
rem *** is specified in COMPILER variable.
|
||||
rem *** "cycle" option), unless a different compiler name (e.g. PPOS2.EXE)
|
||||
rem *** is specified in FPCCOMPILER variable. In any case, the compiler should
|
||||
rem *** reside in the same directory as the other required tools (AS.EXE,
|
||||
rem *** LD.EXE, etc.).
|
||||
rem *** Environment variable OTHEROPTS may be used to specify additional
|
||||
rem *** switches (e.g. setting level of verbosity, etc.).
|
||||
|
||||
@ -46,10 +54,11 @@ goto ErrorDir
|
||||
|
||||
:DirOK
|
||||
|
||||
rem Set path to source files
|
||||
rem Set path to the source files
|
||||
if exist %FPCDIR%\SOURCE goto SrcExists
|
||||
if exist %FPCDIR%\SOURCE\. goto SrcExists
|
||||
if exist %FPCDIR%\SOURCE\makefile goto SrcExists
|
||||
if exist %FPCDIR%\SOURCE\COMPILER\pp.pas goto SrcExists
|
||||
set FPCSRC=%FPCDIR%
|
||||
goto SetOpts
|
||||
|
||||
@ -58,25 +67,56 @@ set FPCSRC=%FPCDIR%\SOURCE
|
||||
|
||||
:SetOpts
|
||||
|
||||
rem Path to file with options
|
||||
set OS2OPTF=%FPCSRC%\OS2SNAP.OPT
|
||||
rem Path for the OS/2 RTL
|
||||
set OS2RTL=%FPCSRC%\RTL\OS2
|
||||
rem Path for OS/2 RTL parts compiled from common sources
|
||||
set OS2RTLC=%FPCSRC%\RTL\INC
|
||||
rem Path for OS/2 RTL parts compiled from processor dependent sources
|
||||
set OS2RTLP=%FPCSRC%\RTL\I386
|
||||
rem Path for OS/2 RTL parts for Object Pascal extensions
|
||||
set OS2RTLO=%FPCSRC%\RTL\OBJPAS
|
||||
rem Path to the compiler source
|
||||
set COMPSPATH=%FPCSRC%\COMPILER
|
||||
rem Option to skip the default configuration file
|
||||
set SKIPCFG=-n
|
||||
rem Common options for OS/2 target
|
||||
set OS2OPT=-TOS2 %OTHEROPTS%
|
||||
set OS2OPT1=-TOS2
|
||||
set OS2OPT2=-dGDB
|
||||
set OS2OPT3=-dI386
|
||||
set OS2OPT4=-Sg
|
||||
rem "Release" options (optimizations, strip debug symbols)
|
||||
set RELEASEOPT1=-Og2p1
|
||||
set RELEASEOPT2=-Xs
|
||||
rem "Debug" options (add debug symbols, do all code generation checks)
|
||||
set DEBUGOPT1=-g
|
||||
set DEBUGOPT2=-Crtoi
|
||||
rem Place for debug or release options, empty by default
|
||||
set CURRENTOPT1=
|
||||
set CURRENTOPT2=
|
||||
rem Stack size for the compiler
|
||||
set STACKOPT=-Cs64500
|
||||
rem Options for OS/2 compiler
|
||||
set OS2COPT=%OS2OPT% %STACKOPT%
|
||||
rem Stripping sybols
|
||||
set STRIPDEBUG=-Xs
|
||||
rem Options and paths for the OS/2 RTL
|
||||
set OS2RTL=-FU%FPCSRC%/RTL/OS2 %OS2OPT% %FPCSRC%/RTL/OS2/
|
||||
rem Options and paths for the OS/2 RTL parts compiled from common sources
|
||||
set OS2RTLC=-FU%FPCSRC%/RTL/OS2 %OS2OPT% %FPCSRC%/RTL/INC/
|
||||
rem Options and paths for the OS/2 RTL parts compiled from processor dependent sources
|
||||
set OS2RTLP=-FU%FPCSRC%/RTL/OS2 %OS2OPT% %FPCSRC%/RTL/I386/
|
||||
rem Options and paths for the OS/2 RTL parts for Object Pascal extensions
|
||||
set OS2RTLO=-FU%FPCSRC%/RTL/OS2 %OS2OPT% %FPCSRC%/RTL/OBJPAS/
|
||||
rem Path to object files
|
||||
set OS2OBJP=-Fo%OS2RTL%
|
||||
rem Path to units
|
||||
set OS2UNITP=-Fu%OS2RTL%
|
||||
rem Path to compiler units
|
||||
set COMPUNITP=-Fu%COMPSPATH%
|
||||
rem Path to compiler include files
|
||||
set COMPINCP=-Fi%COMPSPATH%
|
||||
rem Path to compiler object files
|
||||
set COMPOBJP=-Fo%COMPSPATH%
|
||||
rem Target path for units
|
||||
set OS2UNITT=-FU%OS2RTL%
|
||||
rem Target path for executables
|
||||
set OS2EXET=-FE%COMPSPATH%
|
||||
rem Path to include files
|
||||
set OS2INCP=-Fi%OS2RTL%;%OS2RTLC%;%OS2RTLO%;%OS2RTLP%
|
||||
rem Default compiler for the first compilation
|
||||
set CYCLE=0
|
||||
if .%COMPILER% == . goto SetCompiler
|
||||
set COMPILER=%FPCCOMPILER%
|
||||
if .%FPCCOMPILER% == . goto SetCompiler
|
||||
goto PrgFound
|
||||
:SetCompiler
|
||||
set COMPILER=PPC386.EXE
|
||||
@ -85,54 +125,33 @@ set COMPILER=PPC386.EXE
|
||||
|
||||
echo *Searching for tools ...
|
||||
|
||||
set REALTOOLS=%FPCTOOLS%
|
||||
if %FPCTOOLS%. == . goto SetupTools
|
||||
goto ToolsOK
|
||||
|
||||
:SetupTools
|
||||
if exist %FPCDIR%\BIN\%COMPILER% goto Tools1
|
||||
if exist %FPCDIR%\BIN\%COMPILER%.EXE goto Tools1
|
||||
if exist %FPCDIR%\BIN\OS2\%COMPILER% goto Tools1
|
||||
if exist %FPCDIR%\BIN\OS2\%COMPILER%.EXE goto Tools1
|
||||
goto NoTools1
|
||||
:Tools1
|
||||
if exist %FPCDIR%\BIN\AS.EXE goto Tools1OK
|
||||
if exist %FPCDIR%\BIN\OS2\AS.EXE goto Tools1OK
|
||||
echo *Warning: %COMPILER% found, but AS.EXE isn't in the same directory!
|
||||
goto NoTools1
|
||||
:Tools1OK
|
||||
set FPCTOOLS=%FPCDIR%\BIN\
|
||||
set REALTOOLS=%FPCDIR%\BIN\OS2\
|
||||
goto ToolsOK
|
||||
:NoTools1
|
||||
if exist %FPCDIR%\BIN\GO32V2\%COMPILER% goto Tools2
|
||||
if exist %FPCDIR%\BIN\GO32V2\%COMPILER%.EXE goto Tools2
|
||||
if exist %FPCDIR%\BIN\%COMPILER% goto Tools2
|
||||
if exist %FPCDIR%\BIN\%COMPILER%.EXE goto Tools2
|
||||
goto NoTools2
|
||||
:Tools2
|
||||
if exist %FPCDIR%\BIN\GO32V2\AS.EXE goto Tools2OK
|
||||
if exist %FPCDIR%\BIN\AS.EXE goto Tools2OK
|
||||
echo *Warning: %COMPILER% found, but AS.EXE isn't in the same directory!
|
||||
goto NoTools2
|
||||
:Tools2OK
|
||||
set FPCTOOLS=%FPCDIR%\BIN\GO32V2\
|
||||
set REALTOOLS=%FPCDIR%\BIN\
|
||||
goto ToolsOK
|
||||
:NoTools2
|
||||
if exist %FPCDIR%\BIN\GO32V1\%COMPILER% goto Tools3
|
||||
if exist %FPCDIR%\BIN\GO32V1\%COMPILER%.EXE goto Tools3
|
||||
goto NoTools3
|
||||
:Tools3
|
||||
if exist %FPCDIR%\BIN\GO32V1\AS.EXE goto Tools3OK
|
||||
echo *Warning: %COMPILER% found, but AS.EXE isn't in the same directory!
|
||||
goto NoTools3
|
||||
:Tools3OK
|
||||
set FPCTOOLS=%FPCDIR%\BIN\GO32V1\
|
||||
goto ToolsOK
|
||||
:NoTools3
|
||||
if exist %FPCDIR%\BIN\OS2\%COMPILER% goto Tools4
|
||||
if exist %FPCDIR%\BIN\OS2\%COMPILER%.EXE goto Tools4
|
||||
goto NoTools4
|
||||
:Tools4
|
||||
if exist %FPCDIR%\BIN\OS2\AS.EXE goto Tools4OK
|
||||
echo *Warning: %COMPILER% found, but AS.EXE isn't in the same directory!
|
||||
goto NoTools4
|
||||
:Tools4OK
|
||||
set FPCTOOLS=%FPCDIR%\BIN\OS2\
|
||||
goto ToolsOK
|
||||
:NoTools4
|
||||
echo *Warning: Cannot locate your %COMPILER% and AS.EXE, make sure they're on PATH!
|
||||
|
||||
:ToolsOK
|
||||
@ -140,12 +159,18 @@ echo *Warning: Cannot locate your %COMPILER% and AS.EXE, make sure they're on PA
|
||||
echo *Checking parameters
|
||||
set PARAMS=%1
|
||||
if .%PARAMS% == . set PARAMS=snapshot
|
||||
if %2. == debug set STRIPDEBUG=
|
||||
if %2. == debug set CURRENTOPT1=%DEBUGOPT1%
|
||||
if %2. == debug set CURRENTOPT2=%DEBUGOPT2%
|
||||
if %2. == release set CURRENTOPT1=%RELEASEOPT1%
|
||||
if %2. == release set CURRENTOPT2=%RELEASEOPT2%
|
||||
if %@EVAL[0] == 0 goto Shl1
|
||||
goto Cmd1
|
||||
:Shl1
|
||||
set PARAMS=%@LOWER[%PARAMS%]
|
||||
if .%@LOWER[%2] == .debug set STRIPDEBUG=
|
||||
if .%@LOWER[%2] == .debug set CURRENTOPT1=%DEBUGOPT1%
|
||||
if .%@LOWER[%2] == .debug set CURRENTOPT2=%DEBUGOPT2%
|
||||
if .%@LOWER[%2] == .release set CURRENTOPT1=%RELEASEOPT1%
|
||||
if .%@LOWER[%2] == .release set CURRENTOPT2=%RELEASEOPT2%
|
||||
:Cmd1
|
||||
if %PARAMS% == clean goto CleanRTL
|
||||
if %PARAMS% == both goto CleanRTL
|
||||
@ -159,43 +184,47 @@ goto End
|
||||
:CleanRTL
|
||||
if %@eval[0] == 0 goto JPCleanRTL
|
||||
echo *Cleaning up the RTL (error messages are OK here) ...
|
||||
del %FPCSRC%\RTL\OS2\*.ppo
|
||||
del %FPCSRC%\RTL\OS2\*.oo2
|
||||
del %FPCSRC%\RTL\OS2\ppas.bat
|
||||
del %FPCSRC%\RTL\OS2\ppas.cmd
|
||||
del %FPCSRC%\RTL\OS2\link.res
|
||||
del %OS2OPTF%
|
||||
del %OS2RTL%\*.ppo
|
||||
del %OS2RTL%\*.oo2
|
||||
del %OS2RTL%\ppas.bat
|
||||
del %OS2RTL%\ppas.cmd
|
||||
del %OS2RTL%\link.res
|
||||
goto ContCleanRTL
|
||||
:JPCleanRTL
|
||||
echo *Cleaning up the RTL ...
|
||||
del %FPCSRC%\RTL\OS2\*.ppo >& nul
|
||||
del %FPCSRC%\RTL\OS2\*.oo2 >& nul
|
||||
del %FPCSRC%\RTL\OS2\ppas.bat >& nul
|
||||
del %FPCSRC%\RTL\OS2\ppas.cmd >& nul
|
||||
del %FPCSRC%\RTL\OS2\link.res >& nul
|
||||
del %OS2OPTF% >& nul
|
||||
del %OS2RTL%\*.ppo >& nul
|
||||
del %OS2RTL%\*.oo2 >& nul
|
||||
del %OS2RTL%\ppas.bat >& nul
|
||||
del %OS2RTL%\ppas.cmd >& nul
|
||||
del %OS2RTL%\link.res >& nul
|
||||
:ContCleanRTL
|
||||
if %PARAMS% == rtl goto Branches
|
||||
:CleanCompiler
|
||||
if %@eval[0] == 0 goto JPCleanComp
|
||||
echo *Cleaning up the compiler (error messages are OK here) ...
|
||||
del %FPCSRC%\COMPILER\*.ppo
|
||||
del %FPCSRC%\COMPILER\*.oo2
|
||||
del %FPCSRC%\COMPILER\pp
|
||||
del %FPCSRC%\COMPILER\pp.exe
|
||||
del %FPCSRC%\COMPILER\ppos2.exe
|
||||
del %FPCSRC%\COMPILER\ppas.bat
|
||||
del %FPCSRC%\COMPILER\ppas.cmd
|
||||
del %FPCSRC%\COMPILER\link.res
|
||||
del %OS2OPTF%
|
||||
del %COMPSPATH%\*.ppo
|
||||
del %COMPSPATH%\*.oo2
|
||||
del %COMPSPATH%\pp
|
||||
del %COMPSPATH%\pp.exe
|
||||
del %COMPSPATH%\ppos2.exe
|
||||
del %COMPSPATH%\ppas.bat
|
||||
del %COMPSPATH%\ppas.cmd
|
||||
del %COMPSPATH%\link.res
|
||||
goto ContCleanComp
|
||||
:JPCleanComp
|
||||
echo *Cleaning up the compiler ...
|
||||
del %FPCSRC%\COMPILER\*.ppo >& nul
|
||||
del %FPCSRC%\COMPILER\*.oo2 >& nul
|
||||
del %FPCSRC%\COMPILER\pp >& nul
|
||||
del %FPCSRC%\COMPILER\pp.exe >& nul
|
||||
del %FPCSRC%\COMPILER\ppos2.exe >& nul
|
||||
del %FPCSRC%\COMPILER\ppas.bat >& nul
|
||||
del %FPCSRC%\COMPILER\ppas.cmd >& nul
|
||||
del %FPCSRC%\COMPILER\link.res >& nul
|
||||
del %OS2OPTF% >& nul
|
||||
del %COMPSPATH%\*.ppo >& nul
|
||||
del %COMPSPATH%\*.oo2 >& nul
|
||||
del %COMPSPATH%\pp >& nul
|
||||
del %COMPSPATH%\pp.exe >& nul
|
||||
del %COMPSPATH%\ppos2.exe >& nul
|
||||
del %COMPSPATH%\ppas.bat >& nul
|
||||
del %COMPSPATH%\ppas.cmd >& nul
|
||||
del %COMPSPATH%\link.res >& nul
|
||||
:ContCleanComp
|
||||
if %PARAMS% == compiler goto Branches
|
||||
if %PARAMS% == both goto Branches
|
||||
@ -220,80 +249,107 @@ echo *Error: Unknown parameter - %PARAMS%
|
||||
goto End
|
||||
|
||||
:RTL1
|
||||
echo *Creating file with all the needed options and paths for RTL ...
|
||||
echo %SKIPCFG% > %OS2OPTF%
|
||||
echo %OS2OPT1% >> %OS2OPTF%
|
||||
echo %OS2OPT2% >> %OS2OPTF%
|
||||
echo %OS2OPT3% >> %OS2OPTF%
|
||||
echo %OS2OPT4% >> %OS2OPTF%
|
||||
echo %OS2OBJP% >> %OS2OPTF%
|
||||
echo %OS2UNITP% >> %OS2OPTF%
|
||||
echo %OS2INCP% >> %OS2OPTF%
|
||||
echo %OS2UNITT% >> %OS2OPTF%
|
||||
echo -FD%REALTOOLS% >> %OS2OPTF%
|
||||
if not .%CURRENTOPT1% == . echo %CURRENTOPT1% >> %OS2OPTF%
|
||||
if not .%CURRENTOPT2% == . echo %CURRENTOPT2% >> %OS2OPTF%
|
||||
echo *Assembling the helpers ...
|
||||
%FPCDIR%\BIN\OS2\as -o %FPCSRC%/RTL/OS2/prt0.oo2 %FPCSRC%/RTL/OS2/prt0.as
|
||||
%FPCDIR%\BIN\OS2\as -o %FPCSRC%/RTL/OS2/prt1.oo2 %FPCSRC%/RTL/OS2/prt1.as
|
||||
%FPCDIR%\BIN\OS2\as -o %FPCSRC%/RTL/OS2/code2.oo2 %FPCSRC%/RTL/OS2/code2.as
|
||||
%FPCDIR%\BIN\OS2\as -o %FPCSRC%/RTL/OS2/code3.oo2 %FPCSRC%/RTL/OS2/code3.as
|
||||
%REALTOOLS%\as -o %OS2RTL%\prt0.oo2 %OS2RTL%\prt0.as
|
||||
%REALTOOLS%\as -o %OS2RTL%\prt1.oo2 %OS2RTL%\prt1.as
|
||||
%REALTOOLS%\as -o %OS2RTL%\code2.oo2 %OS2RTL%\code2.as
|
||||
%REALTOOLS%\as -o %OS2RTL%\code3.oo2 %OS2RTL%\code3.as
|
||||
echo *Compiling the system unit ...
|
||||
%FPCTOOLS%%COMPILER% -Sg -Us %OS2RTL%SYSOS2.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% -Us %OTHEROPTS% %OS2RTL%\SYSOS2.PAS
|
||||
echo *Compiling unit Objects ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLC%OBJECTS.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLC%\OBJECTS.PP
|
||||
echo *Compiling unit Strings ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLC%STRINGS.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLC%\STRINGS.PP
|
||||
echo *Compiling unit HeapTrace ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLC%HEAPTRC.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLC%\HEAPTRC.PP
|
||||
echo *Compiling unit CPU ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLP%CPU.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLP%\CPU.PP
|
||||
echo *Compiling unit MMX ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLP%MMX.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLP%\MMX.PP
|
||||
echo *Compiling unit TypInfo ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLO%TYPINFO.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLO%\TYPINFO.PP
|
||||
echo *Compiling unit DosCalls ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%DOSCALLS.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\DOSCALLS.PAS
|
||||
echo *Compiling unit DOS ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%DOS.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\DOS.PAS
|
||||
echo *Compiling unit CRT ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%CRT.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\CRT.PAS
|
||||
echo *Compiling unit Printer ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%PRINTER.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\PRINTER.PAS
|
||||
echo *Compiling unit SysUtils ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLO%SYSUTILS.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLO%\SYSUTILS.PP
|
||||
echo *Compiling unit Math ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLO%MATH.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLO%\MATH.PP
|
||||
echo *Compiling unit UComplex ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLC%UCOMPLEX.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLC%\UCOMPLEX.PP
|
||||
echo *Compiling unit GetOpts ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLC%GETOPTS.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLC%\GETOPTS.PP
|
||||
echo *Compiling unit KbdCalls ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%KBDCALLS.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\KBDCALLS.PAS
|
||||
echo *Compiling unit MouCalls ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%MOUCALLS.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\MOUCALLS.PAS
|
||||
echo *Compiling unit VioCalls ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%VIOCALLS.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\VIOCALLS.PAS
|
||||
echo *Compiling unit MonCalls ...
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\MONCALLS.PAS
|
||||
echo *Compiling unit Ports ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%PORTS.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\PORTS.PAS
|
||||
echo *Compiling PM units ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%PMWIN.PAS
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%PMBITMAP.PAS
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%PMGPI.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\PMWIN.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\PMBITMAP.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\PMGPI.PAS
|
||||
echo *Compiling MMOS2 units ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%DIVE.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\DIVE.PAS
|
||||
|
||||
if %PARAMS% == rtl goto End
|
||||
|
||||
:Compiler
|
||||
echo *Compiling the compiler itself ...
|
||||
%FPCTOOLS%%COMPILER% %OS2COPT% %STRIPDEBUG% -FE%FPCSRC%/COMPILER -Fu%FPCSRC%/COMPILER -dGDB -dI386 %FPCSRC%/COMPILER/PP.PAS
|
||||
echo *Creating file with all the needed options and paths for the compiler ...
|
||||
echo %SKIPCFG% > %OS2OPTF%
|
||||
echo %OS2OPT1% >> %OS2OPTF%
|
||||
echo %OS2OPT2% >> %OS2OPTF%
|
||||
echo %OS2OPT3% >> %OS2OPTF%
|
||||
echo %OS2OPT4% >> %OS2OPTF%
|
||||
echo %OS2OBJP% >> %OS2OPTF%
|
||||
echo %OS2UNITP% >> %OS2OPTF%
|
||||
echo -FD%REALTOOLS% >> %OS2OPTF%
|
||||
echo %COMPUNITP% >> %OS2OPTF%
|
||||
echo %COMPINCP% >> %OS2OPTF%
|
||||
echo %COMPOBJP% >> %OS2OPTF%
|
||||
echo %STACKOPT% >> %OS2OPTF%
|
||||
echo %OS2EXET% >> %OS2OPTF%
|
||||
if not .%CURRENTOPT1% == . echo %CURRENTOPT1% >> %OS2OPTF%
|
||||
if not .%CURRENTOPT2% == . echo %CURRENTOPT2% >> %OS2OPTF%
|
||||
echo *Compiling the compiler ...
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %COMPSPATH%\PP.PAS
|
||||
:Comp2
|
||||
ren %FPCSRC%\COMPILER\pp.exe ppos2.exe
|
||||
if exist %FPCSRC%\COMPILER\ppos2.exe goto OKCompiler
|
||||
if exist %FPCSRC%\COMPILER\ppas.bat goto PPasBat
|
||||
if exist %FPCSRC%\COMPILER\ppas.bat goto PPasCmd
|
||||
echo *Error: Compiler wasn't compiled!!
|
||||
ren %COMPSPATH%\pp.exe ppos2.exe
|
||||
if exist %COMPSPATH%\ppos2.exe goto OKCompiler
|
||||
if exist %COMPSPATH%\ppas.bat goto PPasBat
|
||||
if exist %COMPSPATH%\ppas.cmd goto PPasCmd
|
||||
echo *Error: The compiler wasn't compiled!!
|
||||
goto End
|
||||
|
||||
:PPasCmd
|
||||
ren %COMPSPATH%\ppas.cmd ppas.bat
|
||||
|
||||
:PPasBat
|
||||
echo *Automatic binding failed, trying again ...
|
||||
call %FPCSRC%\COMPILER\ppas.bat
|
||||
del %FPCSRC%\COMPILER\ppas.bat
|
||||
goto Comp2
|
||||
goto PPas
|
||||
|
||||
:PPasCmd
|
||||
echo *Automatic binding failed, trying again ...
|
||||
call %FPCSRC%\COMPILER\ppas.cmd
|
||||
del %FPCSRC%\COMPILER\ppas.cmd
|
||||
call %COMPSPATH%\ppas.bat
|
||||
del %COMPSPATH%\ppas.bat
|
||||
goto Comp2
|
||||
|
||||
:OKCompiler
|
||||
@ -308,17 +364,17 @@ goto CheckEnv
|
||||
rem Another loop?
|
||||
if %CYCLE% == 2 goto CheckEnv
|
||||
echo *Backing up previous compiler version ...
|
||||
copy %FPCDIR%\BIN\OS2\ppos2.exe %FPCDIR%\BIN\OS2\ppos2.old
|
||||
echo *Copying the newly created compiler to %FPCDIR%\BIN\OS2 ...
|
||||
copy %FPCSRC%\COMPILER\ppos2.exe %FPCDIR%\BIN\OS2
|
||||
copy %REALTOOLS%ppos2.exe %REALTOOLS%ppos2.%CYCLE%
|
||||
echo *Copying the newly created compiler to %REALTOOLS% ...
|
||||
copy %COMPSPATH%\ppos2.exe %REALTOOLS%.
|
||||
if %CYCLE% == 1 goto Cycle2
|
||||
set COMPILER=PPOS2.EXE
|
||||
set CYCLE=1
|
||||
goto SetupTools
|
||||
goto Cmd1
|
||||
|
||||
:Cycle2
|
||||
set CYCLE=2
|
||||
goto SetupTools
|
||||
goto Cmd1
|
||||
|
||||
:CheckEnv
|
||||
|
||||
@ -339,7 +395,7 @@ cdd %FPCSRC%
|
||||
:Cmd2
|
||||
|
||||
rem ZIP.EXE must be on the PATH
|
||||
zip -9 -r snap-os2.zip compiler\ppos2.exe rtl\os2\*.ppo rtl\os2\*.oo2
|
||||
zip -9 -r snap-os2.zip compiler\ppos2.exe rtl\os2\*.ppo rtl\os2\*.oo2 rtl\os2\*.ao2
|
||||
if exist snap-os2.zip goto ZipOK
|
||||
echo *Error: The ZIP file hasn't been created!!
|
||||
:ZipOK
|
||||
@ -354,8 +410,8 @@ goto End
|
||||
|
||||
|
||||
$Log$
|
||||
Revision 1.5 2000-01-02 16:38:51 hajny
|
||||
+ unit Ports added
|
||||
Revision 1.6 2000-01-16 18:44:21 hajny
|
||||
* got rid of PPC386.CFG dependency
|
||||
|
||||
Revision 1.3 1999/10/01 09:00:21 hajny
|
||||
+ PMGPI and DIVE added
|
||||
|
||||
321
base/os2snap.cmd
321
base/os2snap.cmd
@ -7,23 +7,30 @@ rem *** FPCDIR variable must be set to your base FPC directory and
|
||||
rem *** must _not_ contain forward slashes (only backslashes allowed).
|
||||
rem *** Your compiler (PPOS2.EXE per default) and AS.EXE must be somewhere
|
||||
rem *** on PATH (unless you set path to them explicitly using FPCTOOLS
|
||||
rem *** variable, which must end with \ if present).
|
||||
rem *** variable, which must end with \ if present). However, be sure which
|
||||
rem *** version of AS.EXE, etc. gets called if several such files exist.
|
||||
rem *** One of the following parameters may be specified: rtl, compiler,
|
||||
rem *** both, cycle and snapshot - "snapshot" being the default, optionally
|
||||
rem *** followed by second parameter "debug" causing debugging symbols
|
||||
rem *** not to be stripped from the created compiler (parameter _must_ be
|
||||
rem *** in lowercase to be recognized correctly, unless running under 4os2).
|
||||
rem *** both, cycle and snapshot ("snapshot" being the default), optionally
|
||||
rem *** followed by a second parameter "debug" (causing debugging symbols
|
||||
rem *** not to be stripped from the created compiler), or "release" (code
|
||||
rem *** optimization, debug info stripped out). Parameters _must_ be in
|
||||
rem *** lowercase to be recognized correctly, unless running under 4os2).
|
||||
rem *** Meaning of parameters:
|
||||
rem *** rtl .......... RTL only, no snapshot created
|
||||
rem *** compiler ..... compiler only, no snapshot created
|
||||
rem *** both ......... both RTL and compiler, no snapshot created
|
||||
rem *** rtl .......... RTL only, _no_ snapshot created
|
||||
rem *** compiler ..... compiler only, _no_ snapshot created
|
||||
rem *** both ......... both RTL and compiler, _no_ snapshot created
|
||||
rem *** snapshot ..... both RTL and compiler, snapshot _is_ created
|
||||
rem *** cycle ........ RTL and compiler compiled, the resulting compiler
|
||||
rem *** is then copied to /BIN/OS2 (backing up previous
|
||||
rem *** version to ppos2.old) and used to compile both RTL and
|
||||
rem *** compiler again, and then finally snapshot is created
|
||||
rem *** is then copied to %FPCTOOLS% (BIN\OS2 by default)
|
||||
rem *** backing up possible previous version to ppos2.x),
|
||||
rem *** the whole procedure is started again (RTL is compiled
|
||||
rem *** with the new compiler version this time) and after
|
||||
rem *** another cycle (to make sure the new compiler works
|
||||
rem *** correctly) the snapshot is finally created
|
||||
rem *** PPOS2.EXE is used for the compilation, unless a different compiler name
|
||||
rem *** is specified in COMPILER variable.
|
||||
rem *** is specified in FPCCOMPILER variable. In any case, the compiler should
|
||||
rem *** reside in the same directory as the other required tools (AS.EXE,
|
||||
rem *** LD.EXE, etc.).
|
||||
rem *** Environment variable OTHEROPTS may be used to specify additional
|
||||
rem *** switches (e.g. setting level of verbosity, etc.).
|
||||
|
||||
@ -42,10 +49,11 @@ goto ErrorDir
|
||||
|
||||
:DirOK
|
||||
|
||||
rem Set path to source files
|
||||
rem Set path to the source files
|
||||
if exist %FPCDIR%\SOURCE goto SrcExists
|
||||
if exist %FPCDIR%\SOURCE\. goto SrcExists
|
||||
if exist %FPCDIR%\SOURCE\makefile goto SrcExists
|
||||
if exist %FPCDIR%\SOURCE\COMPILER\pp.pas goto SrcExists
|
||||
set FPCSRC=%FPCDIR%
|
||||
goto SetOpts
|
||||
|
||||
@ -54,25 +62,56 @@ set FPCSRC=%FPCDIR%\SOURCE
|
||||
|
||||
:SetOpts
|
||||
|
||||
rem Path to file with options
|
||||
set OS2OPTF=%FPCSRC%\OS2SNAP.OPT
|
||||
rem Path for the OS/2 RTL
|
||||
set OS2RTL=%FPCSRC%\RTL\OS2
|
||||
rem Path for OS/2 RTL parts compiled from common sources
|
||||
set OS2RTLC=%FPCSRC%\RTL\INC
|
||||
rem Path for OS/2 RTL parts compiled from processor dependent sources
|
||||
set OS2RTLP=%FPCSRC%\RTL\I386
|
||||
rem Path for OS/2 RTL parts for Object Pascal extensions
|
||||
set OS2RTLO=%FPCSRC%\RTL\OBJPAS
|
||||
rem Path to the compiler source
|
||||
set COMPSPATH=%FPCSRC%\COMPILER
|
||||
rem Option to skip the default configuration file
|
||||
set SKIPCFG=-n
|
||||
rem Common options for OS/2 target
|
||||
set OS2OPT=-TOS2 %OTHEROPTS%
|
||||
set OS2OPT1=-TOS2
|
||||
set OS2OPT2=-dGDB
|
||||
set OS2OPT3=-dI386
|
||||
set OS2OPT4=-Sg
|
||||
rem "Release" options (optimizations, strip debug symbols)
|
||||
set RELEASEOPT1=-Og2p1
|
||||
set RELEASEOPT2=-Xs
|
||||
rem "Debug" options (add debug symbols, do all code generation checks)
|
||||
set DEBUGOPT1=-g
|
||||
set DEBUGOPT2=-Crtoi
|
||||
rem Place for debug or release options, empty by default
|
||||
set CURRENTOPT1=
|
||||
set CURRENTOPT2=
|
||||
rem Stack size for the compiler
|
||||
set STACKOPT=-Cs64500
|
||||
rem Options for OS/2 compiler
|
||||
set OS2COPT=%OS2OPT% %STACKOPT%
|
||||
rem Stripping sybols
|
||||
set STRIPDEBUG=-Xs
|
||||
rem Options and paths for the OS/2 RTL
|
||||
set OS2RTL=-FU%FPCSRC%/RTL/OS2 %OS2OPT% %FPCSRC%/RTL/OS2/
|
||||
rem Options and paths for the OS/2 RTL parts compiled from common sources
|
||||
set OS2RTLC=-FU%FPCSRC%/RTL/OS2 %OS2OPT% %FPCSRC%/RTL/INC/
|
||||
rem Options and paths for the OS/2 RTL parts compiled from processor dependent sources
|
||||
set OS2RTLP=-FU%FPCSRC%/RTL/OS2 %OS2OPT% %FPCSRC%/RTL/I386/
|
||||
rem Options and paths for the OS/2 RTL parts for Object Pascal extensions
|
||||
set OS2RTLO=-FU%FPCSRC%/RTL/OS2 %OS2OPT% %FPCSRC%/RTL/OBJPAS/
|
||||
rem Path to object files
|
||||
set OS2OBJP=-Fo%OS2RTL%
|
||||
rem Path to units
|
||||
set OS2UNITP=-Fu%OS2RTL%
|
||||
rem Path to compiler units
|
||||
set COMPUNITP=-Fu%COMPSPATH%
|
||||
rem Path to compiler include files
|
||||
set COMPINCP=-Fi%COMPSPATH%
|
||||
rem Path to compiler object files
|
||||
set COMPOBJP=-Fo%COMPSPATH%
|
||||
rem Target path for units
|
||||
set OS2UNITT=-FU%OS2RTL%
|
||||
rem Target path for executables
|
||||
set OS2EXET=-FE%COMPSPATH%
|
||||
rem Path to include files
|
||||
set OS2INCP=-Fi%OS2RTL%;%OS2RTLC%;%OS2RTLO%;%OS2RTLP%
|
||||
rem Default compiler for the first compilation
|
||||
set CYCLE=0
|
||||
if .%COMPILER% == . goto SetCompiler
|
||||
set COMPILER=%FPCCOMPILER%
|
||||
if .%FPCCOMPILER% == . goto SetCompiler
|
||||
goto PrgFound
|
||||
:SetCompiler
|
||||
set COMPILER=PPOS2.EXE
|
||||
@ -81,54 +120,33 @@ set COMPILER=PPOS2.EXE
|
||||
|
||||
echo *Searching for tools ...
|
||||
|
||||
set REALTOOLS=%FPCTOOLS%
|
||||
if %FPCTOOLS%. == . goto SetupTools
|
||||
goto ToolsOK
|
||||
|
||||
:SetupTools
|
||||
if exist %FPCDIR%\BIN\%COMPILER% goto Tools1
|
||||
if exist %FPCDIR%\BIN\%COMPILER%.EXE goto Tools1
|
||||
if exist %FPCDIR%\BIN\OS2\%COMPILER% goto Tools1
|
||||
if exist %FPCDIR%\BIN\OS2\%COMPILER%.EXE goto Tools1
|
||||
goto NoTools1
|
||||
:Tools1
|
||||
if exist %FPCDIR%\BIN\AS.EXE goto Tools1OK
|
||||
if exist %FPCDIR%\BIN\OS2\AS.EXE goto Tools1OK
|
||||
echo *Warning: %COMPILER% found, but AS.EXE isn't in the same directory!
|
||||
goto NoTools1
|
||||
:Tools1OK
|
||||
set FPCTOOLS=%FPCDIR%\BIN\
|
||||
set REALTOOLS=%FPCDIR%\BIN\OS2\
|
||||
goto ToolsOK
|
||||
:NoTools1
|
||||
if exist %FPCDIR%\BIN\GO32V2\%COMPILER% goto Tools2
|
||||
if exist %FPCDIR%\BIN\GO32V2\%COMPILER%.EXE goto Tools2
|
||||
if exist %FPCDIR%\BIN\%COMPILER% goto Tools2
|
||||
if exist %FPCDIR%\BIN\%COMPILER%.EXE goto Tools2
|
||||
goto NoTools2
|
||||
:Tools2
|
||||
if exist %FPCDIR%\BIN\GO32V2\AS.EXE goto Tools2OK
|
||||
if exist %FPCDIR%\BIN\AS.EXE goto Tools2OK
|
||||
echo *Warning: %COMPILER% found, but AS.EXE isn't in the same directory!
|
||||
goto NoTools2
|
||||
:Tools2OK
|
||||
set FPCTOOLS=%FPCDIR%\BIN\GO32V2\
|
||||
set REALTOOLS=%FPCDIR%\BIN\
|
||||
goto ToolsOK
|
||||
:NoTools2
|
||||
if exist %FPCDIR%\BIN\GO32V1\%COMPILER% goto Tools3
|
||||
if exist %FPCDIR%\BIN\GO32V1\%COMPILER%.EXE goto Tools3
|
||||
goto NoTools3
|
||||
:Tools3
|
||||
if exist %FPCDIR%\BIN\GO32V1\AS.EXE goto Tools3OK
|
||||
echo *Warning: %COMPILER% found, but AS.EXE isn't in the same directory!
|
||||
goto NoTools3
|
||||
:Tools3OK
|
||||
set FPCTOOLS=%FPCDIR%\BIN\GO32V1\
|
||||
goto ToolsOK
|
||||
:NoTools3
|
||||
if exist %FPCDIR%\BIN\OS2\%COMPILER% goto Tools4
|
||||
if exist %FPCDIR%\BIN\OS2\%COMPILER%.EXE goto Tools4
|
||||
goto NoTools4
|
||||
:Tools4
|
||||
if exist %FPCDIR%\BIN\OS2\AS.EXE goto Tools4OK
|
||||
echo *Warning: %COMPILER% found, but AS.EXE isn't in the same directory!
|
||||
goto NoTools4
|
||||
:Tools4OK
|
||||
set FPCTOOLS=%FPCDIR%\BIN\OS2\
|
||||
goto ToolsOK
|
||||
:NoTools4
|
||||
echo *Warning: Cannot locate your %COMPILER% and AS.EXE, make sure they're on PATH!
|
||||
|
||||
:ToolsOK
|
||||
@ -136,12 +154,18 @@ echo *Warning: Cannot locate your %COMPILER% and AS.EXE, make sure they're on PA
|
||||
echo *Checking parameters
|
||||
set PARAMS=%1
|
||||
if .%PARAMS% == . set PARAMS=snapshot
|
||||
if %2. == debug set STRIPDEBUG=
|
||||
if %2. == debug set CURRENTOPT1=%DEBUGOPT1%
|
||||
if %2. == debug set CURRENTOPT2=%DEBUGOPT2%
|
||||
if %2. == release set CURRENTOPT1=%RELEASEOPT1%
|
||||
if %2. == release set CURRENTOPT2=%RELEASEOPT2%
|
||||
if %@EVAL[0] == 0 goto Shl1
|
||||
goto Cmd1
|
||||
:Shl1
|
||||
set PARAMS=%@LOWER[%PARAMS%]
|
||||
if .%@LOWER[%2] == .debug set STRIPDEBUG=
|
||||
if .%@LOWER[%2] == .debug set CURRENTOPT1=%DEBUGOPT1%
|
||||
if .%@LOWER[%2] == .debug set CURRENTOPT2=%DEBUGOPT2%
|
||||
if .%@LOWER[%2] == .release set CURRENTOPT1=%RELEASEOPT1%
|
||||
if .%@LOWER[%2] == .release set CURRENTOPT2=%RELEASEOPT2%
|
||||
:Cmd1
|
||||
if %PARAMS% == clean goto CleanRTL
|
||||
if %PARAMS% == both goto CleanRTL
|
||||
@ -155,43 +179,47 @@ goto End
|
||||
:CleanRTL
|
||||
if %@eval[0] == 0 goto JPCleanRTL
|
||||
echo *Cleaning up the RTL (error messages are OK here) ...
|
||||
del %FPCSRC%\RTL\OS2\*.ppo
|
||||
del %FPCSRC%\RTL\OS2\*.oo2
|
||||
del %FPCSRC%\RTL\OS2\ppas.bat
|
||||
del %FPCSRC%\RTL\OS2\ppas.cmd
|
||||
del %FPCSRC%\RTL\OS2\link.res
|
||||
del %OS2OPTF%
|
||||
del %OS2RTL%\*.ppo
|
||||
del %OS2RTL%\*.oo2
|
||||
del %OS2RTL%\ppas.bat
|
||||
del %OS2RTL%\ppas.cmd
|
||||
del %OS2RTL%\link.res
|
||||
goto ContCleanRTL
|
||||
:JPCleanRTL
|
||||
echo *Cleaning up the RTL ...
|
||||
del %FPCSRC%\RTL\OS2\*.ppo >& nul
|
||||
del %FPCSRC%\RTL\OS2\*.oo2 >& nul
|
||||
del %FPCSRC%\RTL\OS2\ppas.bat >& nul
|
||||
del %FPCSRC%\RTL\OS2\ppas.cmd >& nul
|
||||
del %FPCSRC%\RTL\OS2\link.res >& nul
|
||||
del %OS2OPTF% >& nul
|
||||
del %OS2RTL%\*.ppo >& nul
|
||||
del %OS2RTL%\*.oo2 >& nul
|
||||
del %OS2RTL%\ppas.bat >& nul
|
||||
del %OS2RTL%\ppas.cmd >& nul
|
||||
del %OS2RTL%\link.res >& nul
|
||||
:ContCleanRTL
|
||||
if %PARAMS% == rtl goto Branches
|
||||
:CleanCompiler
|
||||
if %@eval[0] == 0 goto JPCleanComp
|
||||
echo *Cleaning up the compiler (error messages are OK here) ...
|
||||
del %FPCSRC%\COMPILER\*.ppo
|
||||
del %FPCSRC%\COMPILER\*.oo2
|
||||
del %FPCSRC%\COMPILER\pp
|
||||
del %FPCSRC%\COMPILER\pp.exe
|
||||
del %FPCSRC%\COMPILER\ppos2.exe
|
||||
del %FPCSRC%\COMPILER\ppas.bat
|
||||
del %FPCSRC%\COMPILER\ppas.cmd
|
||||
del %FPCSRC%\COMPILER\link.res
|
||||
del %OS2OPTF%
|
||||
del %COMPSPATH%\*.ppo
|
||||
del %COMPSPATH%\*.oo2
|
||||
del %COMPSPATH%\pp
|
||||
del %COMPSPATH%\pp.exe
|
||||
del %COMPSPATH%\ppos2.exe
|
||||
del %COMPSPATH%\ppas.bat
|
||||
del %COMPSPATH%\ppas.cmd
|
||||
del %COMPSPATH%\link.res
|
||||
goto ContCleanComp
|
||||
:JPCleanComp
|
||||
echo *Cleaning up the compiler ...
|
||||
del %FPCSRC%\COMPILER\*.ppo >& nul
|
||||
del %FPCSRC%\COMPILER\*.oo2 >& nul
|
||||
del %FPCSRC%\COMPILER\pp >& nul
|
||||
del %FPCSRC%\COMPILER\pp.exe >& nul
|
||||
del %FPCSRC%\COMPILER\ppos2.exe >& nul
|
||||
del %FPCSRC%\COMPILER\ppas.bat >& nul
|
||||
del %FPCSRC%\COMPILER\ppas.cmd >& nul
|
||||
del %FPCSRC%\COMPILER\link.res >& nul
|
||||
del %OS2OPTF% >& nul
|
||||
del %COMPSPATH%\*.ppo >& nul
|
||||
del %COMPSPATH%\*.oo2 >& nul
|
||||
del %COMPSPATH%\pp >& nul
|
||||
del %COMPSPATH%\pp.exe >& nul
|
||||
del %COMPSPATH%\ppos2.exe >& nul
|
||||
del %COMPSPATH%\ppas.bat >& nul
|
||||
del %COMPSPATH%\ppas.cmd >& nul
|
||||
del %COMPSPATH%\link.res >& nul
|
||||
:ContCleanComp
|
||||
if %PARAMS% == compiler goto Branches
|
||||
if %PARAMS% == both goto Branches
|
||||
@ -216,80 +244,111 @@ echo *Error: Unknown parameter - %PARAMS%
|
||||
goto End
|
||||
|
||||
:RTL1
|
||||
echo *Creating file with all the needed options and paths for RTL ...
|
||||
echo %SKIPCFG% > %OS2OPTF%
|
||||
echo %OS2OPT1% >> %OS2OPTF%
|
||||
echo %OS2OPT2% >> %OS2OPTF%
|
||||
echo %OS2OPT3% >> %OS2OPTF%
|
||||
echo %OS2OPT4% >> %OS2OPTF%
|
||||
echo %OS2OBJP% >> %OS2OPTF%
|
||||
echo %OS2UNITP% >> %OS2OPTF%
|
||||
echo %OS2INCP% >> %OS2OPTF%
|
||||
echo %OS2UNITT% >> %OS2OPTF%
|
||||
echo -FD%REALTOOLS% >> %OS2OPTF%
|
||||
if not .%CURRENTOPT1% == . echo %CURRENTOPT1% >> %OS2OPTF%
|
||||
if not .%CURRENTOPT2% == . echo %CURRENTOPT2% >> %OS2OPTF%
|
||||
echo *Assembling the helpers ...
|
||||
%FPCDIR%\BIN\OS2\as -o %FPCSRC%/RTL/OS2/prt0.oo2 %FPCSRC%/RTL/OS2/prt0.as
|
||||
%FPCDIR%\BIN\OS2\as -o %FPCSRC%/RTL/OS2/prt1.oo2 %FPCSRC%/RTL/OS2/prt1.as
|
||||
%FPCDIR%\BIN\OS2\as -o %FPCSRC%/RTL/OS2/code2.oo2 %FPCSRC%/RTL/OS2/code2.as
|
||||
%FPCDIR%\BIN\OS2\as -o %FPCSRC%/RTL/OS2/code3.oo2 %FPCSRC%/RTL/OS2/code3.as
|
||||
%REALTOOLS%\as -o %OS2RTL%\prt0.oo2 %OS2RTL%\prt0.as
|
||||
%REALTOOLS%\as -o %OS2RTL%\prt1.oo2 %OS2RTL%\prt1.as
|
||||
%REALTOOLS%\as -o %OS2RTL%\code2.oo2 %OS2RTL%\code2.as
|
||||
%REALTOOLS%\as -o %OS2RTL%\code3.oo2 %OS2RTL%\code3.as
|
||||
echo *Compiling the system unit ...
|
||||
%FPCTOOLS%%COMPILER% -Sg -Us %OS2RTL%SYSOS2.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% -Us %OTHEROPTS% %OS2RTL%\SYSOS2.PAS
|
||||
echo *Compiling unit Objects ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLC%OBJECTS.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLC%\OBJECTS.PP
|
||||
echo *Compiling unit Strings ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLC%STRINGS.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLC%\STRINGS.PP
|
||||
echo *Compiling unit HeapTrace ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLC%HEAPTRC.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLC%\HEAPTRC.PP
|
||||
echo *Compiling unit CPU ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLP%CPU.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLP%\CPU.PP
|
||||
echo *Compiling unit MMX ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLP%MMX.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLP%\MMX.PP
|
||||
echo *Compiling unit TypInfo ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLO%TYPINFO.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLO%\TYPINFO.PP
|
||||
echo *Compiling unit DosCalls ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%DOSCALLS.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\DOSCALLS.PAS
|
||||
echo *Compiling unit DOS ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%DOS.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\DOS.PAS
|
||||
echo *Compiling unit CRT ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%CRT.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\CRT.PAS
|
||||
echo *Compiling unit Printer ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%PRINTER.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\PRINTER.PAS
|
||||
echo *Compiling unit SysUtils ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLO%SYSUTILS.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLO%\SYSUTILS.PP
|
||||
echo *Compiling unit Math ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLO%MATH.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLO%\MATH.PP
|
||||
echo *Compiling unit UComplex ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLC%UCOMPLEX.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLC%\UCOMPLEX.PP
|
||||
echo *Compiling unit GetOpts ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTLC%GETOPTS.PP
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTLC%\GETOPTS.PP
|
||||
echo *Compiling unit KbdCalls ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%KBDCALLS.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\KBDCALLS.PAS
|
||||
echo *Compiling unit MouCalls ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%MOUCALLS.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\MOUCALLS.PAS
|
||||
echo *Compiling unit VioCalls ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%VIOCALLS.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\VIOCALLS.PAS
|
||||
echo *Compiling unit MonCalls ...
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\MONCALLS.PAS
|
||||
echo *Compiling unit Ports ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%PORTS.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\PORTS.PAS
|
||||
echo *Compiling PM units ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%PMWIN.PAS
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%PMBITMAP.PAS
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%PMGPI.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\PMWIN.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\PMBITMAP.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\PMGPI.PAS
|
||||
echo *Compiling MMOS2 units ...
|
||||
%FPCTOOLS%%COMPILER% %OS2RTL%DIVE.PAS
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %OS2RTL%\DIVE.PAS
|
||||
|
||||
if %PARAMS% == rtl goto End
|
||||
|
||||
:Compiler
|
||||
echo *Compiling the compiler itself ...
|
||||
%FPCTOOLS%%COMPILER% %OS2COPT% %STRIPDEBUG% -FE%FPCSRC%/COMPILER -Fu%FPCSRC%/COMPILER -dGDB -dI386 %FPCSRC%/COMPILER/PP.PAS
|
||||
echo *Creating file with all the needed options and paths for the compiler ...
|
||||
echo %SKIPCFG% > %OS2OPTF%
|
||||
echo %OS2OPT1% >> %OS2OPTF%
|
||||
echo %OS2OPT2% >> %OS2OPTF%
|
||||
echo %OS2OPT3% >> %OS2OPTF%
|
||||
echo %OS2OPT4% >> %OS2OPTF%
|
||||
echo %OS2OBJP% >> %OS2OPTF%
|
||||
echo %OS2UNITP% >> %OS2OPTF%
|
||||
echo -FD%REALTOOLS% >> %OS2OPTF%
|
||||
echo %COMPUNITP% >> %OS2OPTF%
|
||||
echo %COMPINCP% >> %OS2OPTF%
|
||||
echo %COMPOBJP% >> %OS2OPTF%
|
||||
echo %STACKOPT% >> %OS2OPTF%
|
||||
echo %OS2EXET% >> %OS2OPTF%
|
||||
if not .%CURRENTOPT1% == . echo %CURRENTOPT1% >> %OS2OPTF%
|
||||
if not .%CURRENTOPT2% == . echo %CURRENTOPT2% >> %OS2OPTF%
|
||||
echo *Compiling the compiler ...
|
||||
%REALTOOLS%%COMPILER% @%OS2OPTF% %OTHEROPTS% %COMPSPATH%\PP.PAS
|
||||
:Comp2
|
||||
ren %FPCSRC%\COMPILER\pp.exe ppos2.exe
|
||||
if exist %FPCSRC%\COMPILER\ppos2.exe goto OKCompiler
|
||||
if exist %FPCSRC%\COMPILER\ppas.bat goto PPasBat
|
||||
if exist %FPCSRC%\COMPILER\ppas.bat goto PPasCmd
|
||||
echo *Error: Compiler wasn't compiled!!
|
||||
ren %COMPSPATH%\pp.exe ppos2.exe
|
||||
if exist %COMPSPATH%\ppos2.exe goto OKCompiler
|
||||
if exist %COMPSPATH%\ppas.bat goto PPasBat
|
||||
if exist %COMPSPATH%\ppas.cmd goto PPasCmd
|
||||
echo *Error: The compiler wasn't compiled!!
|
||||
goto End
|
||||
|
||||
:PPasBat
|
||||
echo *Automatic binding failed, trying again ...
|
||||
call %FPCSRC%\COMPILER\ppas.bat
|
||||
del %FPCSRC%\COMPILER\ppas.bat
|
||||
call %COMPSPATH%\ppas.bat
|
||||
del %COMPSPATH%\ppas.bat
|
||||
goto Comp2
|
||||
goto PPas
|
||||
|
||||
:PPasCmd
|
||||
echo *Automatic binding failed, trying again ...
|
||||
call %FPCSRC%\COMPILER\ppas.cmd
|
||||
del %FPCSRC%\COMPILER\ppas.cmd
|
||||
call %COMPSPATH%\ppas.cmd
|
||||
del %COMPSPATH%\ppas.cmd
|
||||
goto Comp2
|
||||
|
||||
:OKCompiler
|
||||
@ -304,17 +363,17 @@ goto CheckEnv
|
||||
rem Another loop?
|
||||
if %CYCLE% == 2 goto CheckEnv
|
||||
echo *Backing up previous compiler version ...
|
||||
copy %FPCDIR%\BIN\OS2\ppos2.exe %FPCDIR%\BIN\OS2\ppos2.old
|
||||
echo *Copying the newly created compiler to %FPCDIR%\BIN\OS2 ...
|
||||
copy %FPCSRC%\COMPILER\ppos2.exe %FPCDIR%\BIN\OS2
|
||||
copy %REALTOOLS%ppos2.exe %REALTOOLS%ppos2.%CYCLE%
|
||||
echo *Copying the newly created compiler to %REALTOOLS% ...
|
||||
copy %COMPSPATH%\ppos2.exe %REALTOOLS%.
|
||||
if %CYCLE% == 1 goto Cycle2
|
||||
set COMPILER=PPOS2.EXE
|
||||
set CYCLE=1
|
||||
goto SetupTools
|
||||
goto Cmd1
|
||||
|
||||
:Cycle2
|
||||
set CYCLE=2
|
||||
goto SetupTools
|
||||
goto Cmd1
|
||||
|
||||
:CheckEnv
|
||||
|
||||
@ -335,7 +394,7 @@ cdd %FPCSRC%
|
||||
:Cmd2
|
||||
|
||||
rem ZIP.EXE must be on the PATH
|
||||
zip -9 -r snap-os2.zip compiler\ppos2.exe rtl\os2\*.ppo rtl\os2\*.oo2
|
||||
zip -9 -r snap-os2.zip compiler\ppos2.exe rtl\os2\*.ppo rtl\os2\*.oo2 rtl\os2\*.ao2
|
||||
if exist snap-os2.zip goto ZipOK
|
||||
echo *Error: The ZIP file hasn't been created!!
|
||||
:ZipOK
|
||||
@ -350,8 +409,8 @@ goto End
|
||||
|
||||
|
||||
$Log$
|
||||
Revision 1.5 2000-01-02 16:38:51 hajny
|
||||
+ unit Ports added
|
||||
Revision 1.6 2000-01-16 18:44:21 hajny
|
||||
* got rid of PPC386.CFG dependency
|
||||
|
||||
Revision 1.3 1999/10/01 09:00:21 hajny
|
||||
+ PMGPI and DIVE added
|
||||
|
||||
Loading…
Reference in New Issue
Block a user