Bläddra i källkod

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

git-svn-id: trunk@1626 -
florian 20 år sedan
förälder
incheckning
380d3be22c
1 ändrade filer med 1 tillägg och 0 borttagningar
  1. 1 0
      rtl/inc/variant.inc

+ 1 - 0
rtl/inc/variant.inc

@@ -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;
   begin
+    result:=nil;
     variantmanager.vartodynarray(result,v,typeinfo);
   end;