mirror of
https://github.com/vishapoberon/vipak.git
synced 2026-04-05 20:42:26 +00:00
32 lines
622 B
Modula-2
32 lines
622 B
Modula-2
MODULE opium;
|
|
IMPORT
|
|
Args,
|
|
Logger,
|
|
PackageFileParser,
|
|
Strings;
|
|
CONST
|
|
helpText = "HEEEELP";
|
|
ArrayMaxNumber = 500;
|
|
VAR
|
|
command: ARRAY ArrayMaxNumber OF CHAR;
|
|
|
|
PROCEDURE help();
|
|
BEGIN
|
|
Logger.Log(helpText);
|
|
END help;
|
|
|
|
PROCEDURE parseArgs(VAR argument: ARRAY OF CHAR);
|
|
BEGIN
|
|
COPY("", argument);
|
|
IF Args.argc > 1 THEN Args.Get(1, argument) END;
|
|
END parseArgs;
|
|
|
|
BEGIN
|
|
parseArgs(command);
|
|
|
|
IF Strings.Match(command, "") OR Strings.Match(command, "--help")THEN
|
|
help;
|
|
ELSIF Strings.Match(command, "install") THEN
|
|
PackageFileParser.install();
|
|
END;
|
|
END opium.
|