Difference between revisions of "Macros and Conditionals/fr"

From Lazarus wiki
Jump to navigationJump to search
(ut true)
Line 14: Line 14:
 
[[File:CompilerAdditionsAndOverrides1.png]]
 
[[File:CompilerAdditionsAndOverrides1.png]]
  
=Conditionals=
+
=Conditionnelles=
  
The conditionals use a simple scripting language.  
+
Les expressions conditionnelles utilisent un langage de scripting simple.  
  
==Changing compiler options with conditionals==
+
==Changement des options du compilateur avec les expressions conditionnelles==
  
The conditionals script can define some variables which values are used by the IDE for the compiler options:
+
Le script de conditionnelles peut définir certaines variables dont les valeurs sont utilisées par l'EDI pour les options du compilateur :
  
*'''UnitPath''': appended to ''Other Source Files (-Fu)''. The / and \ characters are automatically converted to the current path delimiter. After adding the search path(s) with a semicolon macros are replaced and relative paths are extended by the package/project directory.
+
*'''UnitPath''': ajouté en fin de ''Autres fichiers sources (-Fu)''. Les caractères / et \ sont automatiquement convertis vers le séparateur de chemin courant. Après avoir ajouté le(s) chemin(s) de recherche) avec un point-virgule, les macros sont remplacées et les chemins relatifs sont expansés par le chemin d'accès du projet/paquet.
*'''IncPath''': appended to ''Include Files (-Fi)''.
+
*'''IncPath''': ajouté en fin de ''Fichiers d'inclusion (-Fi)''.
*'''LibraryPath''': appended to ''Libraries (-Fl)''.
+
*'''LibraryPath''': ajouté en fin de ''Bibliothèques (-Fl)''.
*'''SrcPath''': appended to ''Other sources (not used by compiler, only IDE)''.
+
*'''SrcPath''': ajouté en fin de ''Autres sources (non utilisé par le compilateur, uniquement par l'EDI)''.
*'''DebugPath''': appended to ''Debugger path addition (not used by compiler, not by the codetools, only used by debugger)''
+
*'''DebugPath''': ajouté en fin de ''Ajout de chemin du débogueur (non utilisé par le compilateur ni par les outils de code, seulement par le débogueur)''
*'''LinkerOptions''': appended to the linker options (-k). Path delimiters are not changed. Relative paths are not extended. Macros are replaced.
+
*'''LinkerOptions''': ajouté en fin des options de l'éditeur de liens (-k). Les délimiteurs de chemin ne sont pas changés. Les chemins relatifs ne sont pas expansés. Les macros sont remplacées.
*'''CustomOptions''': appended to the compiler parameters. Path delimiters are not changed. Relative paths are not extended. Macros are replaced.  
+
*'''CustomOptions''': ajouté en fin des paramètres du compilateur. Les délimiteurs de chemin ne sont pas changés. Les chemins relatifs ne sont pas expansés. Les macros sont remplacées.
*'''OutputDir''': if set it will replace the current output directory. Path delimiters are changed. Relative path is extended. Macros are replaced.
+
*'''OutputDir''': si défini, il remplacera le dossier de sortie courant. Les délimiteurs de chemin sont changés. Les chemins relatifs sont expansés. Les macros sont remplacées.
  
For packages there are more variables for the usage options. These paths are inherited, that means appended to all packages/projects using this package, directly or indirectly:
+
Pour les paquets, il y a plus de variables pour les options d'usage. Ces chemins sont hérités, cela signifie qu'ils sont ajoutés à tous les paquets/projets utilisant ce paquet, directement ou non :  
  
*'''UsageUnitPath''': appended to ''Unit (-Fu)'' usage path. The / and \ characters are automatically converted to the current path delimiter. After adding the search path(s) with a semicolon macros are replaced and relative paths are extended by the package/project directory.
+
*'''UsageUnitPath''' : ajouté en fin du chemin d'usage ''Unité (-Fu)''. Les caractères / et \ sont automatiquement convertis dans le séparateur de chemin actuel. Après avoir ajouté le(s) chemin(s) de recherche) avec un point-virgule, les macros sont remplacées et les chemins relatifs sont expansés par le chemin d'accès du projet/paquet.
*'''UsageIncPath''': appended to ''Include (-Fi)'' usage path.
+
*'''UsageIncPath''' : ajouté en fin du chemin d'usage ''Inclusion (-Fi)''.
*'''UsageLibraryPath''': appended to ''Library (-Fl)'' usage path.
+
*'''UsageLibraryPath''' : ajouté en fin du chemin d'usage ''Bibliothèque (-Fl)''.
*'''UsageSrcPath''': appended to ''Source (not used by compiler, only IDE)'' usage path.
+
*'''UsageSrcPath''' : ajouté en fin du chemin d'usage ''Source (pas utilisé par le compilateur, seulement l'EDI)''.
*'''UsageDebugPath''': appended to ''Debugger (not used by compiler, not by the codetools, only used by debugger)'' usage path.
+
*'''UsageDebugPath''' : ajouté en fin du chemin d'usage ''Débogueur (pas utilisé par le compilateur, ni par les outils de code, utilisé seulement par le débogueur)''.
*'''UsageLinkerOptions''': appended to the usage linker options (-k). Path delimiters are not changed. Relative paths are not extended. Macros are replaced.
+
*'''UsageLinkerOptions''' : ajouté en fin des options de l'éditeur de liens (-k). Les délimiteurs de chemin ne sont pas changés. Les chemins relatifs ne sont pas expansés. Les macros sont remplacées.
*'''UsageCustomOptions''': appended to the usage compiler parameters. Path delimiters are not changed. Relative paths are not extended.
+
*'''UsageCustomOptions''' : ajouté en fin des paramètres d'usage du compilateur. Les délimiteurs de chemin ne sont pas changés. Les chemins relatifs ne sont pas expansés.
  
==Conditionals syntax==
+
==Syntaxe des expressions conditionnelles==
  
===Supported syntax constructs===
+
===Constructions de syntaxe supportées===
*If expression then statement;
+
*If expression then instruction;
*If expression then statement else statement;
+
*If expression then instruction else instruction;
*begin statement; ... statement; end;
+
*begin instruction; ... instruction; end;
 
*Variable:=expression;
 
*Variable:=expression;
 
*Variable+=expression;
 
*Variable+=expression;
*Comments //, { }, (* *)
+
*Commentaires //, { }, (* *)
*Spaces, tabs and line breaks are the same. Like Pascal they are only needed to separate two identifiers/keywords.
+
*Espaces, tabulations et saut de ligne sont les mêmes. Comme en Pascal, ils ne sont requis que pour séparer deux identificateurs/mots-clés.
  
 
===Variables===
 
===Variables===
  
Variables are defined simply by assigning a value. There are some predefined variables. See further below for a list.
+
Les variables sont définies simplement en assignant une valeur. Il y a des variables prédéfinies. Voir ci-dessous pour une liste.
  
Variables can be defined or undefined:
+
Les variables peuvent être définies ou indéfinies :
  
 
<syntaxhighlight>
 
<syntaxhighlight>
Line 64: Line 64:
 
</syntaxhighlight>
 
</syntaxhighlight>
  
If a Variable is defined it has one of these three types:
+
Si une variables est définie, elle peut avoir l'un de ces trois types :
*none
+
*aucun
*string
+
*chaîne de caractères
*number (int64)
+
*numérique (int64)
  
A variable is '''false''' if it has the number 0 or the string '0'. Otherwise it is '''true'''. That means a variable without a value is true and an undefined variable is true.
+
Une variable est '''false''' si elle prend la valeur numérique 0 ou chaîne '0'. Sinon, elle vaut '''true'''. Cela signifie qu'une variable sans valeur est vraie tout comme une variable indéfinie.
  
You can change the type of a variable with:
+
Vous pouvez changer le type d'une variable avec :
  
 
<syntaxhighlight>
 
<syntaxhighlight>
 
a:='1'; // string
 
a:='1'; // string
a:=integer(a); // convert to a number using StrToInt(), on failure 'a' remains a string
+
a:=integer(a); // convertit vers un nombre en utilisant StrToInt(), en cas d'échec, la variable demeure une chaîne
a:=int64(a); // convert to a number using StrToInt64(), on failure 'a' remains a string
+
a:=int64(a); // convertit vers un nombre en utilisant StrToInt64(), en cas d'échec, la variable demeure une chaîne
a:=string(a); // convert to a string
+
a:=string(a); // convertit vers une chaîne
 
</syntaxhighlight>
 
</syntaxhighlight>
  
===Constants===
+
===Constantes===
  
 
<syntaxhighlight>
 
<syntaxhighlight>
Line 101: Line 101:
 
*'''+=''': Add and assign. Not allowed in expressions.
 
*'''+=''': Add and assign. Not allowed in expressions.
  
Precedence levels:
+
Niveaux de précédence:
*1 Not and unary minus
+
*1 Not et - (moins unaire)
 
*1 And
 
*1 And
 
*2 Or
 
*2 Or
Line 114: Line 114:
 
*4 >=
 
*4 >=
  
==Predefined Variables==
+
==Variables prédéfinies==
  
Before the conditionals script is run the IDE initializes a few variables:
+
Avant que le script d'expressions conditionnelles ne soit exécuté, l'EDI initialise quelques variables :
  
*'''TargetOS''': the project's target operating system as defined by fpc. e.g. 'linux', 'win32', 'darwin', 'freebsd', 'wince'.
+
*'''TargetOS''' : le système d'exploitation cible comme défini par fpc p.ex. 'linux', 'win32', 'darwin', 'freebsd', 'wince'.
*'''TargetCPU''': the project's target processor as defined by fpc. e.g. 'i386', 'x86_64', 'arm'
+
*'''TargetCPU''': le processeur cible du projet comme défini par fpc p.exe. 'i386', 'x86_64', 'arm'.
*'''SrcOS''': the value 'win' for all MS Windows platforms and 'unix' for all unix like platforms. The value depends on the TargetOS.
+
*'''SrcOS''': la valeur 'win' pour toute plate-forme MS Windows et 'unix' pour toutes les plate-formes unixiennes. La valeur dépend de TargetOS.
*'''SrcOS2''': the value 'bsd' for all BSD like platforms. The value depends on the TargetOS.
+
*'''SrcOS2''': la valeur 'bsd' pour toutes les plates-formes BSD-iennes. La valeur dépend de TargetOS.
*'''True''': value 1
+
*'''True''' : valeur 1
*'''False''': value 0
+
*'''False''' : valeur 0
*all build macros defined by the current project.
+
*toutes les macros de construction définies par le projet en cours.
*all build macros defined by used packages. That means if the project has not defined a value for a package macro the value of the conditionals of the used package will be used.
+
*Toutes les macros de construction définies par les paquets utilisés. Cela signifie que si le projet n'a pas défini une valeur pour une macro du paquet, la valeur de la conditionnelle du paquet utilisé sera utilisée.
  
==Predefined Functions==
+
==Fonction prédéfinies==
  
 
*'''Defined(Variable)''': returns 1 (true) if the variable is defined otherwise 0 (false). Example if Defined(Macro1) then ;
 
*'''Defined(Variable)''': returns 1 (true) if the variable is defined otherwise 0 (false). Example if Defined(Macro1) then ;

Revision as of 14:32, 18 February 2017

English (en) français (fr) русский (ru)

Généralité

Des macros peuvent être utilisées dans les chemins de recherche et les noms de fichier pour laisser l'EDI les adapter à la plate-forme cible. Les macros de construction sont des macros spécifiques au projet/paquet. Elles ne sont pas passées au compilateur. Un exemple important est la LCLWidgetType, laquelle est définie dans le paquet LCL et permet de choisir le jeu de widgets (carbon, gtk, qt, win32, wince, ...).

Les conditionnelles sont des règles permettant de mettre des macros dépendantes de la palte-forme cible et/ou d'autres macros. Par exemple, vous pouvez les utiliser pour définir des options spéciales de l'éditeur de lien pour Mac OS X. Elle utilisent un langage de script comme Pascal pour définir des règles complexes.

Vous pouvez définir les macros de construction via Project / Project Options / Compiler Options / Additions and Overrides (en)

Vous pouvez faire des conditionnelles via Projet / Options du projet / Options du compilateur / Options personnalisées.

Les macros de construction et les conditionnelles existent depuis Lazarus 0.9.29.

CompilerAdditionsAndOverrides1.png

Conditionnelles

Les expressions conditionnelles utilisent un langage de scripting simple.

Changement des options du compilateur avec les expressions conditionnelles

Le script de conditionnelles peut définir certaines variables dont les valeurs sont utilisées par l'EDI pour les options du compilateur :

  • UnitPath: ajouté en fin de Autres fichiers sources (-Fu). Les caractères / et \ sont automatiquement convertis vers le séparateur de chemin courant. Après avoir ajouté le(s) chemin(s) de recherche) avec un point-virgule, les macros sont remplacées et les chemins relatifs sont expansés par le chemin d'accès du projet/paquet.
  • IncPath: ajouté en fin de Fichiers d'inclusion (-Fi).
  • LibraryPath: ajouté en fin de Bibliothèques (-Fl).
  • SrcPath: ajouté en fin de Autres sources (non utilisé par le compilateur, uniquement par l'EDI).
  • DebugPath: ajouté en fin de Ajout de chemin du débogueur (non utilisé par le compilateur ni par les outils de code, seulement par le débogueur)
  • LinkerOptions: ajouté en fin des options de l'éditeur de liens (-k). Les délimiteurs de chemin ne sont pas changés. Les chemins relatifs ne sont pas expansés. Les macros sont remplacées.
  • CustomOptions: ajouté en fin des paramètres du compilateur. Les délimiteurs de chemin ne sont pas changés. Les chemins relatifs ne sont pas expansés. Les macros sont remplacées.
  • OutputDir: si défini, il remplacera le dossier de sortie courant. Les délimiteurs de chemin sont changés. Les chemins relatifs sont expansés. Les macros sont remplacées.

Pour les paquets, il y a plus de variables pour les options d'usage. Ces chemins sont hérités, cela signifie qu'ils sont ajoutés à tous les paquets/projets utilisant ce paquet, directement ou non :

  • UsageUnitPath : ajouté en fin du chemin d'usage Unité (-Fu). Les caractères / et \ sont automatiquement convertis dans le séparateur de chemin actuel. Après avoir ajouté le(s) chemin(s) de recherche) avec un point-virgule, les macros sont remplacées et les chemins relatifs sont expansés par le chemin d'accès du projet/paquet.
  • UsageIncPath : ajouté en fin du chemin d'usage Inclusion (-Fi).
  • UsageLibraryPath : ajouté en fin du chemin d'usage Bibliothèque (-Fl).
  • UsageSrcPath : ajouté en fin du chemin d'usage Source (pas utilisé par le compilateur, seulement l'EDI).
  • UsageDebugPath : ajouté en fin du chemin d'usage Débogueur (pas utilisé par le compilateur, ni par les outils de code, utilisé seulement par le débogueur).
  • UsageLinkerOptions : ajouté en fin des options de l'éditeur de liens (-k). Les délimiteurs de chemin ne sont pas changés. Les chemins relatifs ne sont pas expansés. Les macros sont remplacées.
  • UsageCustomOptions : ajouté en fin des paramètres d'usage du compilateur. Les délimiteurs de chemin ne sont pas changés. Les chemins relatifs ne sont pas expansés.

Syntaxe des expressions conditionnelles

Constructions de syntaxe supportées

  • If expression then instruction;
  • If expression then instruction else instruction;
  • begin instruction; ... instruction; end;
  • Variable:=expression;
  • Variable+=expression;
  • Commentaires //, { }, (* *)
  • Espaces, tabulations et saut de ligne sont les mêmes. Comme en Pascal, ils ne sont requis que pour séparer deux identificateurs/mots-clés.

Variables

Les variables sont définies simplement en assignant une valeur. Il y a des variables prédéfinies. Voir ci-dessous pour une liste.

Les variables peuvent être définies ou indéfinies :

if defined(Name) then ...
if undefined(Name) then ...
undefine(Name);

Si une variables est définie, elle peut avoir l'un de ces trois types :

  • aucun
  • chaîne de caractères
  • numérique (int64)

Une variable est false si elle prend la valeur numérique 0 ou chaîne '0'. Sinon, elle vaut true. Cela signifie qu'une variable sans valeur est vraie tout comme une variable indéfinie.

Vous pouvez changer le type d'une variable avec :

a:='1'; // string
a:=integer(a); // convertit vers un nombre en utilisant StrToInt(), en cas d'échec, la variable demeure une chaîne
a:=int64(a); // convertit vers un nombre en utilisant StrToInt64(), en cas d'échec, la variable demeure une chaîne
a:=string(a); // convertit vers une chaîne

Constantes

a:=1234; // decimal
a:=$A1B; // hexadecimal
a:=&127; // octal
a:=%101; // binary
a:='10'; // string
a:=#123; // character

Operators

  • +: Two numbers are added, otherwise they are treated as strings and concatenated.
  • <, >, <=, >=, =, <>: Two numbers are compared mathematically, otherwise they are treated as strings and compared lexicographically (case sensitive).
  • not: Unary boolean operator
  • and, or, xor: Boolean operators
  • (,): Group operations
  • :=: Assignment. Not allowed in expressions.
  • +=: Add and assign. Not allowed in expressions.

Niveaux de précédence:

  • 1 Not et - (moins unaire)
  • 1 And
  • 2 Or
  • 2 XOr
  • 2 +
  • 4 =
  • 4 <>
  • 4 <
  • 4 <=
  • 4 >
  • 4 >=

Variables prédéfinies

Avant que le script d'expressions conditionnelles ne soit exécuté, l'EDI initialise quelques variables :

  • TargetOS : le système d'exploitation cible comme défini par fpc p.ex. 'linux', 'win32', 'darwin', 'freebsd', 'wince'.
  • TargetCPU: le processeur cible du projet comme défini par fpc p.exe. 'i386', 'x86_64', 'arm'.
  • SrcOS: la valeur 'win' pour toute plate-forme MS Windows et 'unix' pour toutes les plate-formes unixiennes. La valeur dépend de TargetOS.
  • SrcOS2: la valeur 'bsd' pour toutes les plates-formes BSD-iennes. La valeur dépend de TargetOS.
  • True : valeur 1
  • False : valeur 0
  • toutes les macros de construction définies par le projet en cours.
  • Toutes les macros de construction définies par les paquets utilisés. Cela signifie que si le projet n'a pas défini une valeur pour une macro du paquet, la valeur de la conditionnelle du paquet utilisé sera utilisée.

Fonction prédéfinies

  • Defined(Variable): returns 1 (true) if the variable is defined otherwise 0 (false). Example if Defined(Macro1) then ;
  • Undefine(Variable): undefine the variable. Example: Undefine(A);
  • Int64(expression): Returns the int64 value of expression. Example: i:=int64('3');
  • Integer(expression): Returns the integer value of expression. Example: i:=integer('3');
  • String(expression): Returns the string value of expression. Example: s:=string(3);
  • GetIDEValue(string): See IDE macros
    • GetIDEValue('OS'): Returns the OS with which the IDE was compiled. since 1.0.
    • GetIDEValue('CPU'): Returns the CPU with which the IDE was compiled. since 1.0.
    • GetIDEValue('SrcOS'): SrcOS of IDE. since 1.0.
    • GetIDEValue('SrcOS2'): SrcOS2 of IDE. since 1.0.
    • GetIDEValue('LCLWidgeType'): LCL platform of the IDE, which might be different than project. lazbuild returns win32, carbon or gtk2 depending on its OS. since 1.0.
  • GetEnv(string): Returns the environment variable. For example GetEnv('HOME') returns under Linux the user's home directory. since 1.0.
  • GetProjValue(string): Returns a project value.
    • GetProjValue('FPC_FULLVERSION'): Returns the FPC_FULLVERSION fetched from the project compiler. The version is an integer e.g. 20701. since 1.3.

Order of macro computation

  1. the values of the current project are taken
  2. if the project does not define values for TargetOS, TargetCPU the IDE sets defaults
  3. SrcOS and SrcOS2 are computed from TargetOS
  4. the conditionals of used packages are computed. If package A uses package B, then the conditionals of B are computed before the conditionals of A.
  5. Every conditional script starts with the values of the project.
    • If the project does not define a value for a package macro, the result of the used package is used.
    • A script can alter any macro while it runs, but only the build macros and the built-in macros are used. For example you can set TargetOS to another value, but this has no effect on any other script, nor on any search path using $(TargetOS), not even the search path of the package itself.
    • If two packages define the same build macro, then both can alter the value (unless the project sets a value). The exact effect depends on the dependency order.
  6. the default IDE macros are used last.

Examples

Adding a compiler flag for target Linux

if TargetOS = 'linux' then 
  CustomOptions := '-dUseCThreads';

Note:

  • TargetOS is a predefined macro by the IDE.
  • CustomOptions is a result variable used by the IDE.
  • The identifiers are case insensitive, but = (equal) operator is not. The TargetOS macro uses the same case as the compiler does, which is currently all lowercase.
  • The IDE adds the first space automatically when adding the custom options.
  • When used in a package the above only will be applied to the options used for compiling the package, not to the project using the package.

Adding some linker options for target Mac OS X

The compiler uses for Mac OS X the value 'darwin' for TargetOS.

if TargetOS = 'darwin' then begin
  LinkerOptions += ' -framework Cocoa';
  if TargetCPU = 'i386' then 
    LinkerOptions += ' -framework OpenGL';
end;

Notes:

  • TargetOS and TargetCPU are predefined macros by the IDE.
  • The += operator appends a string or adds a number.
  • When adding several options you have to add a space between options.
  • The IDE adds the first space automatically when adding the linker options.
  • You can nest begin..end just like Pascal.
  • If both conditions hold LinkerOptions will contain the value ' -framework Cocoa -framework OpenGL'.
  • The IDE automatically prepends the -k option when passing linker options to the compiler.
  • The above only works for project's conditionals.

Adding some linker options for Mac OS X for all projects using a package

Packages have two different sets of options. The set used for compiling the package itself and the options added to all projects/packages using the package. You have to change the usage options of the package:

if TargetOS = 'darwin' then begin
  UsageLinkerOptions += ' -framework Cocoa';
  if TargetCPU = 'i386' then 
    UsageLinkerOptions += ' -framework OpenGL';
end;

Adding an option to a package

If your package provides some optional parts, for example the ability to use opengl you can define a build macro. The following explains how to set this up step by step:

Let's say your package is called Pkg1 and allows to switch on opengl support by compiling it with the flag -dEnableOpenGL. The package should provide a boolean option Pkg1_UseOpenGL with the values 'True' and 'False'.

Open the package editor of your package 'pkg1', click on compiler options, select the page IDE Macros.

Click on the left + button to add a new macro. It will be called 'Pkg1_Macro1'. Click on the tree node to rename it to 'Pkg1_UseOpenGL'.

Click on the middle + button to add a new macro value. It will be called 'Value1'. Click on the tree node to rename it to 'True'. Repeat this for the value 'False'.

Add the following code into the Conditionals (Compiler Options / Other / Conditionals) text box:

if Pkg1_UseOpenGL='True' then 
  CustomOptions := '-dEnableOpenGL';

Compileroptions buildmacro example1.png

Notes:

  • The value 'True' is case sensitive. Because the value is usually selected from the combobox, there is no chance of typos.
  • If the user has not set any value for the macro, the Variable 'Pkg1_UseOpenGL' is undefined and the expression results to false.

Add a release/debug mode

A release/debug mode for your project and all your packages

Note: This requires Lazarus 0.9.31 or higher.

In the project's compiler options (Project / Project Options / Compiler Options / Build modes) add a build mode Release. Adding this build mode will automatically activate it, so all changes to the compiler options are now only done in this build mode.

In "Set Macro Values" click on the left column on the last row "(none)". Set it to "MyPackageOptions". Note: It is not listed in the combo box.

Set its value to the options. For example "-O3".

Build mode release macro1.png

This macro is usable in the project compiler options and all packages.

For each package do: Open the compiler options of the package, go to the page Other. Add to Custom options the text $(MyPackageOptions).

A special release/debug mode for one package

Let's say the normal mode is the debug mode and you want another mode for the release.

Open the package editor of your package 'pkg1', click on compiler options, select the page Build Macros.

Under Build macros click on the left + button to add a new macro. It will be called 'Pkg1_Macro1'. Click on the tree node to rename it to 'Pkg1_Release'.

Click on the middle + button to add a new macro value. It will be called 'Value1'. Click on the tree node to rename it to 'True'. Repeat this for the value 'False'.

Add the following code into the Conditionals text box:

if Pkg1_Release='True' then 
  // release mode
  CustomOptions := '-O3'
else
  // debug mode
  CustomOptions := '-Sa Ctroi';

Notes:

  • The value 'True' is case sensitive. Because the value is usually selected from the combobox, there is no chance of typos.
  • If the user has not set any value for the macro, the Variable 'Pkg1_Release' is undefined and the expression results to false.

Adding a macro for search paths to handle different platforms

Let's say your package is called Pkg1 and uses the windows GDI on MS Windows and X11 on Linux and BSD. The platform independent units are in the package main directory and you have created two sub directories 'gdi' and 'x11' containing the platform dependent units:

/path/of/your/package/pkg1/
  pkg1.lpk
  pkg1.pas
  generalunit.pas
  gdi/
    backend.pas
  x11/
    backend.pas

The unit backend in gdi should be used on Win32, Win64 and WinCE, while under Linux and FreeBSD the backend unit in the x11 should be used. This means the Other unit files (-Fu) search path must be adapted depending on the target OS. The following describes how to set this up step by step:

Open the package editor of your package 'pkg1', click on compiler options, select the page Build Macros.

Click on the left + button to add a new macro. It will be called 'Pkg1_Macro1'. Click on the tree node to rename it to 'Pkg1_Backend'.

Click on the middle + button to add a new macro value. It will be called 'Value1'. Click on the tree node to rename it to 'gdi'. Repeat this for the value 'x11'.

Add the following code into the Conditionals text box:

// choose a value for Pkg1_Backend depending on the TargetOS
if undefined(Pkg1_Backend) then begin
  if SrcOS='win' then
    Pkg1_Backend:='gdi'
  else
    Pkg1_Backend:='x11';
end;

The macro $(Pkg1_Backend) will become usable once you click Ok. So, click 'Ok' to close the compiler options and open it again to use it in the search path Other unit files (-Fu).

Compileroptions buildmacro example2.png

Notes:

  • The user can override the value of Pkg1_Backend. Therefore it is good practice to enclose the setting in if undefined(Pkg1_Backend).
  • Instead of the SrcOS macro you could use if (TargetOS='win32') or (TargetOS='win64') or (TargetOS='wince') then
Directives, definitions and conditionals definitions
global compiler directives • local compiler directives

Conditional Compiler Options • Conditional compilation • Macros and Conditionals • Platform defines
$IF