paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 12:59:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazUtils: Rename variable "generic" as "genericP" to not confuse Codetools.

Browse Source 
git-svn-id: branches/fixes_2_0@63471 -
This commit is contained in:
mattias 2020-06-28 16:55:41 +00:00
parent 7138c223b0
commit 06f979742d
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
components/lazutils/lazfreetype.pas
View File

@ -618,7 +618,7 @@ uses
face := PFace(_face.z); face := PFace(_face.z);
if face <> nil then if face <> nil then
begin begin
face^.generic := data; face^.genericP := data;
TT_Set_Face_Pointer := TT_Err_Ok; TT_Set_Face_Pointer := TT_Err_Ok;
end end
else else
@ -634,7 +634,7 @@ uses
begin begin
face := PFace(_face.z); face := PFace(_face.z);
if face <> nil then if face <> nil then
TT_Get_Face_Pointer := face^.generic TT_Get_Face_Pointer := face^.genericP
else else
TT_get_Face_Pointer := nil; TT_get_Face_Pointer := nil;
end; end;
@ -879,7 +879,7 @@ uses
ins := PInstance(_ins.z); ins := PInstance(_ins.z);
if ins <> nil then if ins <> nil then
begin begin
ins^.generic := data; ins^.genericP := data;
TT_Set_Instance_Pointer := TT_Err_Ok; TT_Set_Instance_Pointer := TT_Err_Ok;
end end
else else
@ -895,7 +895,7 @@ uses
begin begin
ins := PInstance(_ins.z); ins := PInstance(_ins.z);
if ins <> nil then if ins <> nil then
TT_Get_Instance_Pointer := ins^.generic TT_Get_Instance_Pointer := ins^.genericP
else else
TT_Get_Instance_Pointer := nil; TT_Get_Instance_Pointer := nil;
end; end;

4
components/lazutils/ttobjs.pas
View File

@ -486,7 +486,7 @@ type
extension : Pointer; extension : Pointer;
(* a typeless pointer to the face object's extensions *) (* a typeless pointer to the face object's extensions *)
generic : Pointer; genericP : Pointer;
(* generic pointer - see TT_Set/Get_Face_Pointer *) (* generic pointer - see TT_Set/Get_Face_Pointer *)
end; end;
@ -537,7 +537,7 @@ type
(* execution context with the instance object *) (* execution context with the instance object *)
(* rather than asking it on demand *) (* rather than asking it on demand *)
generic : Pointer; genericP: Pointer;
(* generic pointer - see TT_Set/Get_Instance_Pointer *) (* generic pointer - see TT_Set/Get_Instance_Pointer *)
end; end;