paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-17 03:39:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fake some types when running under FPDOC

Browse Source 
git-svn-id: trunk@31034 -
This commit is contained in:
michael 2015-06-13 16:23:56 +00:00
parent ebf465a42b
commit bb7e0f645f
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
rtl/objpas/math.pp
View File

@ -50,6 +50,16 @@
unit math;
interface
{$IFDEF FPDOC_MATH}
{$DEFINE FPC_HAS_TYPE_SINGLE}
{$DEFINE FPC_HAS_TYPE_DOUBLE}
{$DEFINE FPC_HAS_TYPE_EXTENDED}
{$DEFINE FPC_HAS_TYPE_COMP}
Type
Float = MaxFloatType;
{$ENDIF}
{$ifndef FPUNONE}
uses
sysutils;