paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-17 05:39:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

# revisions: 47491,47517,47475

Browse Source 
git-svn-id: branches/fixes_3_2@47577 -
This commit is contained in:
marco 2020-11-25 08:17:58 +00:00
parent 9163637388
commit d81a89e309
6 changed files with 4 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
packages/fcl-stl/src/gtree.pp
View File

@ -48,7 +48,6 @@ type
TDepthFirstCallbackType = specialize TDepthFirstCallback<T>; TDepthFirstCallbackType = specialize TDepthFirstCallback<T>;
TBreadthFirstCallbackType = specialize TBreadthFirstCallback<T>; TBreadthFirstCallbackType = specialize TBreadthFirstCallback<T>;
private type private type
type
TStackType = specialize TStack<TTreeNodeType>; TStackType = specialize TStack<TTreeNodeType>;
TQueueType = specialize TQueue<TTreeNodeType>; TQueueType = specialize TQueue<TTreeNodeType>;
private private

1
packages/symbolic/src/parsexpr.inc
View File

@ -495,4 +495,3 @@ end;
Initial revision Initial revision
} }


2
packages/symbolic/src/rearrang.inc
View File

@ -87,4 +87,4 @@ end;
} }

1
packages/symbolic/src/symbexpr.inc
View File

@ -1119,4 +1119,3 @@ end;
Initial revision Initial revision
} }


1
packages/symbolic/src/teval.inc
View File

@ -719,4 +719,3 @@ end;
Initial revision Initial revision
} }


2
packages/winunits-base/src/comobj.pp
View File

@ -1231,7 +1231,7 @@ HKCR
StringMap[NextString].ComStr:=StringToOleStr(PString(Params^)^); StringMap[NextString].ComStr:=StringToOleStr(PString(Params^)^);
StringMap[NextString].PasStr:=PString(Params^); StringMap[NextString].PasStr:=PString(Params^);
Arguments[i].VType:=varOleStr or varByRef; Arguments[i].VType:=varOleStr or varByRef;
Arguments[i].VPointer:=StringMap[NextString].ComStr; Arguments[i].VPointer:=@StringMap[NextString].ComStr;
inc(NextString); inc(NextString);
inc(PPointer(Params)); inc(PPointer(Params));
end; end;