paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-31 05:11:34 +01:00
Code Issues Packages Projects Releases Wiki Activity

* started to fix var. array -> dyn. array

Browse Source 
git-svn-id: trunk@1626 -
This commit is contained in:
florian 2005-11-01 22:41:25 +00:00
parent 653f4b465d
commit 380d3be22c
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
rtl/inc/variant.inc
View File

@ -120,6 +120,7 @@ procedure fpc_vararray_put(var d : variant;const s : variant;indices : psizeint;
function fpc_variant_to_dynarray(const v : variant;typeinfo : pointer) : pointer;compilerproc; function fpc_variant_to_dynarray(const v : variant;typeinfo : pointer) : pointer;compilerproc;
begin begin
result:=nil;
variantmanager.vartodynarray(result,v,typeinfo); variantmanager.vartodynarray(result,v,typeinfo);
end; end;