mirror of
https://github.com/vishapoberon/vipak.git
synced 2026-04-05 20:42:26 +00:00
23 lines
405 B
Modula-2
23 lines
405 B
Modula-2
MODULE vpkGit;
|
|
IMPORT Out,Strings, Platform;
|
|
|
|
PROCEDURE pull*(URL : ARRAY OF CHAR; dst : ARRAY OF CHAR);
|
|
VAR i : INTEGER;
|
|
cmd : ARRAY 120 OF CHAR;
|
|
BEGIN
|
|
cmd:= "git init ";
|
|
Strings.Append(dst, cmd);
|
|
i:=Platform.System(cmd);
|
|
cmd := "";
|
|
cmd := "git -C ";
|
|
Strings.Append(dst,cmd);
|
|
Strings.Append(" pull ",cmd);
|
|
Strings.Append(URL, cmd);
|
|
i := Platform.System(cmd);
|
|
Out.Int(i,0);
|
|
END pull;
|
|
|
|
|
|
BEGIN
|
|
|
|
END vpkGit.
|