|
@@ -8,13 +8,10 @@
|
|
{$mode objfpc}
|
|
{$mode objfpc}
|
|
{$modeswitch objectivec1}
|
|
{$modeswitch objectivec1}
|
|
|
|
|
|
-uses
|
|
|
|
- ctypes;
|
|
|
|
-
|
|
|
|
type
|
|
type
|
|
TMyTestClass = objcclass external name 'NSObject' (NSObject)
|
|
TMyTestClass = objcclass external name 'NSObject' (NSObject)
|
|
{ should not give a hint, since we have 'override' }
|
|
{ should not give a hint, since we have 'override' }
|
|
- function hash: cuint; override;
|
|
|
|
|
|
+ function hash: NSUInteger; override;
|
|
end;
|
|
end;
|
|
|
|
|
|
var
|
|
var
|