fpmake.pp 3.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128
  1. {$ifndef ALLPACKAGES}
  2. {$mode objfpc}{$H+}
  3. program fpmake;
  4. uses fpmkunit;
  5. {$endif ALLPACKAGES}
  6. procedure add_rtl_objpas(const ADirectory: string);
  7. Const
  8. // All Unices have full set of KVM+Crt in unix/ except QNX which is not
  9. // in workable state atm.
  10. UnixLikes = AllUnixOSes -[QNX]; // qnx never was active in 2.x afaik
  11. // AllUnixOSes = [Linux,FreeBSD,NetBSD,OpenBSD,Darwin,QNX,BeOS,Solaris,Haiku,iphonesim,aix,Android];
  12. // unixlikes-[beos];
  13. //
  14. StrUtilsOSes = [amiga,aros,emx,gba,go32v2,msdos,nds,netware,wince,morphos,nativent,os2,netwlibc,win32,win64]+UnixLikes;
  15. VarUtilsOSes = [amiga,aros,emx,gba,go32v2,msdos,nds,netware,wince,morphos,nativent,os2,netwlibc,watcom,wii,win32,win64]+UnixLikes;
  16. ConvUtilsOSes = [nativent,netware,netwlibc,win32,win64,wince]+UnixLikes-[BeOS];
  17. ConvUtilOSes = [Go32v2,msdos,os2,emx];
  18. DateUtilsOSes = [Amiga,aros,gba,morphos,nativent,nds,netware,netwlibc,wii,win32,win64,wince]+UnixLikes;
  19. DateUtilOSes = [Go32v2,msdos,os2,emx];
  20. StdConvsOSes = [NativeNT,Win32,win64,os2,msdos,go32v2]+UnixLikes-[BeOS];
  21. FmtBCDOSes = [amiga,aros,emx,gba,go32v2,morphos,msdos,nativent,nds,netware,netwlibc,os2,win32,win64,wince]+UnixLikes;
  22. VariantsOSes = [amiga,aros,emx,gba,go32v2,morphos,msdos,nativent,nds,netware,netwlibc,os2,watcom,wii,win32,win64,wince]+UnixLikes;
  23. AllTargetsObjPas = DateUtilsOses +DateUtilOSes+
  24. VarutilsOses + ConvutilsOSes + ConvutilOSes + StdConvsOSes+
  25. FmtBCDOSes + StrUtilsOSes;
  26. Var
  27. P : TPackage;
  28. T : TTarget;
  29. begin
  30. With Installer do
  31. begin
  32. P:=AddPackage('rtl-objpas');
  33. P.ShortName:='rtlo';
  34. P.Directory:=ADirectory;
  35. P.Version:='3.1.1';
  36. P.Author := 'FPC core team';
  37. P.License := 'LGPL with modification, ';
  38. P.HomepageURL := 'www.freepascal.org';
  39. P.OSes:=AllTargetsObjPas;
  40. P.Email := '';
  41. P.Description := 'Rtl-objpas, aux. Delphi compat units';
  42. P.NeedLibC:= false;
  43. P.SourcePath.Add('src/inc');
  44. P.SourcePath.Add('src/$(OS)');
  45. P.SourcePath.Add('src/darwin',[iphonesim]);
  46. P.SourcePath.Add('src/unix',AllUnixOSes);
  47. P.SourcePath.Add('src/os2commn',[os2,emx]);
  48. P.SourcePath.Add('src/win',[win32,win64]);
  49. P.IncludePath.Add('src/inc');
  50. P.IncludePath.Add('src/unix',AllUnixOSes);
  51. P.IncludePath.Add('src/$(OS)');
  52. P.IncludePath.Add('src/darwin',[iphonesim]);
  53. T:=P.Targets.AddUnit('strutils.pp',StrUtilsOses);
  54. T:=P.Targets.AddUnit('varutils.pp',VarUtilsOses);
  55. with T.Dependencies do
  56. begin
  57. AddInclude('varutilh.inc');
  58. AddInclude('varutils.inc',VarUtilsOSes-[win32,win64]);
  59. AddInclude('cvarutil.inc');
  60. end;
  61. // 8.3
  62. T:=P.Targets.AddUnit('convutil.pp',ConvutilOSes);
  63. with T.Dependencies do
  64. begin
  65. AddInclude('convutil.inc');
  66. end;
  67. // normal
  68. T:=P.Targets.AddUnit('convutils.pp',ConvutilsOSes);
  69. with T.Dependencies do
  70. begin
  71. AddInclude('convutil.inc');
  72. end;
  73. // 8.3
  74. T:=P.Targets.AddUnit('dateutil.pp',dateutilOSes);
  75. with T.Dependencies do
  76. begin
  77. AddInclude('dateutil.inc');
  78. end;
  79. // normal
  80. T:=P.Targets.AddUnit('dateutils.pp',dateutilsOSes);
  81. with T.Dependencies do
  82. begin
  83. AddInclude('dateutil.inc');
  84. end;
  85. T:=P.Targets.AddUnit('stdconvs.pp',StdConvsOSes);
  86. T.ResourceStrings:=true;
  87. with T.Dependencies do
  88. begin
  89. AddUnit('convutils',ConvUtilsOSes);
  90. AddUnit('convutil',ConvUtilOSes);
  91. end;
  92. T:=P.Targets.AddUnit('fmtbcd.pp',FmtBCDOSes);
  93. with T.Dependencies do
  94. AddUnit('variants');
  95. T:=P.Targets.AddUnit('variants.pp',VariantsOSes);
  96. T.ResourceStrings:=true;
  97. with T.Dependencies do
  98. begin
  99. AddUnit('varutils');
  100. // AddUnit('Math');
  101. end;
  102. end
  103. end;
  104. {$ifndef ALLPACKAGES}
  105. begin
  106. add_rtl_objpas('');
  107. Installer.Run;
  108. end.
  109. {$endif ALLPACKAGES}