initializing some strings with zeros.

This commit is contained in:
Norayr Chilingarian 2022-08-23 05:29:42 +04:00
parent da7af58055
commit dd06820e01
2 changed files with 4 additions and 1 deletions

View file

@ -1,5 +1,5 @@
MODULE vpkGit;
IMPORT Out, Strings, Platform, vpkEnv;
IMPORT Out, Strings, Platform, vpkEnv, strutils;
PROCEDURE pull*(VAR url : ARRAY OF CHAR; VAR dst : ARRAY OF CHAR; VAR branch: ARRAY OF CHAR);
VAR i : INTEGER;

View file

@ -36,6 +36,9 @@ VAR
keys, values: StringList.TStringList;
i: LONGINT;
BEGIN
strutils.zeroStr(URI);
strutils.zeroStr(type);
strutils.zeroStr(branch);
p := NIL;
vpkStorage.json2pstring(d.name^, p);
IF p # NIL THEN