diff options
author | hajny <hajny@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2014-11-10 12:34:59 +0000 |
---|---|---|
committer | hajny <hajny@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2014-11-10 12:34:59 +0000 |
commit | 7993bf6668743baba05f072ab11f1c3d02f7e9d4 (patch) | |
tree | b865b70f19716b456d07b33fb93f8de6431456e8 /compiler/generic | |
parent | e875841e0e7f3c068ba85ba1b1862f789bd0007d (diff) | |
download | fpc-7993bf6668743baba05f072ab11f1c3d02f7e9d4.tar.gz |
* boolean constant instead of IFDEFs for detection of microcontroller support
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@29052 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/generic')
-rw-r--r-- | compiler/generic/cpuinfo.pas | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/compiler/generic/cpuinfo.pas b/compiler/generic/cpuinfo.pas index 28b762da7b..05b9407395 100644 --- a/compiler/generic/cpuinfo.pas +++ b/compiler/generic/cpuinfo.pas @@ -42,7 +42,24 @@ Type fpu_soft ); + tcontrollertype = + (ct_none + ); + Const + { Is there support for dealing with multiple microcontrollers available } + { for this platform? } + ControllerSupport = false; + + { We know that there are fields after sramsize + but we don't care about this warning } + {$PUSH} + {$WARN 3177 OFF} + embedded_controllers : array [tcontrollertype] of tcontrollerdatatype = + ( + (controllertypestr:''; controllerunitstr:''; flashbase:0; flashsize:0; srambase:0; sramsize:0)); + {$POP} + cputypestr : array[tcputype] of string[8] = ('none'); fputypestr : array[tfputype] of string[6] = ('none','soft'); |