pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

Small improvements to objc 1.0 bindings.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@367 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
sekelsenmat
2008-03-04 09:15:57 +00:00
parent e08f7104d0
commit 8268740b2a
2 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
bindings/objc/objc-class.inc
View File

@ -112,9 +112,9 @@ type
Method = Pobjc_method;
objc_method = record
// method_name: SEL;
method_name: SEL;
method_types: PChar;
// method_imp: IMP;
method_imp: IMP;
end;
objc_method_list = record
@ -165,8 +165,8 @@ function class_getInstanceVariable(param1: _Class; const param2: PChar): Ivar; c
function class_getInstanceMethod(param1: _Class; param2: SEL): Method; cdecl; external;
function class_getClassMethod(param1: _Class; param2: SEL): Method; cdecl; external;
procedure class_addMethods(param1: _Class; param2: objc_method_list); cdecl; external;
procedure class_removeMethods(param1: _Class; param2: objc_method_list); cdecl; external;
procedure class_addMethods(param1: _Class; param2: Pobjc_method_list); cdecl; external;
procedure class_removeMethods(param1: _Class; param2: Pobjc_method_list); cdecl; external;
function class_poseAs(imposter, original: _Class): _Class; cdecl; external;

2
bindings/objc/objc.inc
View File

@ -39,7 +39,7 @@ type
// headers a lot.
//
// Cast variables of this type to Pobjc_class when necessary
Pobjc_object = ^objc_object;
objc_object = record