mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-17 00:39:15 +02:00
* no longer allow to compile objcbase without the objc1 feature enabled.
git-svn-id: trunk@37847 -
This commit is contained in:
parent
16738aa458
commit
07ac64bf09
@ -15,13 +15,15 @@
|
|||||||
|
|
||||||
unit objcbase;
|
unit objcbase;
|
||||||
|
|
||||||
{$ifdef FPC_HAS_FEATURE_OBJECTIVEC1}
|
interface
|
||||||
|
|
||||||
|
{$ifndef FPC_HAS_FEATURE_OBJECTIVEC1}
|
||||||
|
{$error ObjectiveC1 feature is not supported or not enabled.}
|
||||||
|
{$endif}
|
||||||
|
|
||||||
{$modeswitch objectivec1}
|
{$modeswitch objectivec1}
|
||||||
{$packrecords c}
|
{$packrecords c}
|
||||||
|
|
||||||
interface
|
|
||||||
|
|
||||||
uses
|
uses
|
||||||
ctypes;
|
ctypes;
|
||||||
|
|
||||||
@ -255,14 +257,4 @@ type
|
|||||||
|
|
||||||
implementation
|
implementation
|
||||||
|
|
||||||
{$else }
|
|
||||||
|
|
||||||
interface
|
|
||||||
|
|
||||||
implementation
|
|
||||||
|
|
||||||
{$endif}
|
|
||||||
|
|
||||||
end.
|
end.
|
||||||
|
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user