mirror of
https://github.com/vishapoberon/vipak.git
synced 2026-04-05 20:42:26 +00:00
removed opium.Mod - not used anywhere.
This commit is contained in:
parent
d72e5df94f
commit
6098d84253
1 changed files with 0 additions and 32 deletions
32
opium.Mod
32
opium.Mod
|
|
@ -1,32 +0,0 @@
|
||||||
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.
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue