mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-10-31 14:41:54 +01:00
40 lines
443 B
ObjectPascal
40 lines
443 B
ObjectPascal
unit UglyIFDEFs;
|
|
{$mode objfpc}{$H+}
|
|
|
|
{$ifndef MPI_INCLUDED}
|
|
{$define MPI_INCLUDED}
|
|
|
|
{$endif}
|
|
|
|
{$if defined(__cplusplus)}
|
|
// only comments and spaces
|
|
{$endif}
|
|
|
|
interface
|
|
|
|
uses
|
|
Classes, SysUtils;
|
|
|
|
{$define HAVE_MPI_OFFSET}
|
|
|
|
{$if !defined(MPI_BUILD_PROFILING)}
|
|
var c: char;
|
|
{$ENDIF}
|
|
|
|
{$define HAVE_MPI_GREQUEST}
|
|
{$ifndef HAVE_MPI_GREQUEST}
|
|
{$endif}
|
|
|
|
{$undef MPI_File_f2c}
|
|
|
|
{$IFDEF Bla}
|
|
|
|
{$ELSE}
|
|
var i: integer;
|
|
{$ENDIF}
|
|
|
|
implementation
|
|
|
|
end.
|
|
|