paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-19 06:32:03 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Alpha aware switch detection

Browse Source
This commit is contained in:
michael 1999-08-02 20:46:57 +00:00
parent 16afc140e9
commit 19b97ee4a4
1 changed files with 30 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

42
compiler/compiler.pas
View File

@ -40,18 +40,33 @@
}
{$ifdef FPC}
{ but I386 or M68K must be defined }
{ and only one of the two }
{$ifndef I386}
{$ifndef M68K}
{$fatal One of the switches I386 or M68K must be defined}
{$endif M68K}
{$endif I386}
{ One of Alpha, I386 or M68K must be defined }
{$UNDEFINE CPUOK}
{$ifdef I386}
{$ifdef M68K}
{$fatal ONLY one of the switches I386 or M68K must be defined}
{$endif M68K}
{$endif I386}
{$define CPUOK}
{$endif}
{$ifdef M68K}
{$ifndef CPUOK}
{$DEFINE CPUOK}
{$else}
{$fatal cannot define two CPU switches}
{$endif}
{$endif}
{$ifdef alpha}
{$ifndef CPUOK}
{$DEFINE CPUOK}
{$else}
{$fatal cannot define two CPU switches}
{$endif}
{$endif}
{$ifndef CPUOK}
{$fatal One of the switches I386,Alpha or M68K must be defined}
{$endif}
{$ifdef support_mmx}
{$ifndef i386}
{$fatal I386 switch must be on for MMX support}
@ -275,7 +290,10 @@ end;
end.
{
$Log$
Revision 1.25 1999-07-18 14:47:22 florian
Revision 1.26 1999-08-02 20:46:57 michael
* Alpha aware switch detection
Revision 1.25 1999/07/18 14:47:22 florian
* bug 487 fixed, (inc(<property>) isn't allowed)
* more fixes to compile with Delphi