gitweb on Svarog
projekti pod git sistemom za održavanje verzija -- projects under the git version control system
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (from parent 1: 11260b1)
raw | patch | inline | side by side (from parent 1: 11260b1)
author | Doni Pracner <quinnuendo@gmail.com> | |
Thu, 13 Aug 2015 12:46:04 +0000 (14:46 +0200) | ||
committer | Doni Pracner <quinnuendo@gmail.com> | |
Thu, 13 Aug 2015 12:46:04 +0000 (14:46 +0200) |
src-wsl/metrics.wsl | patch | blob | history |
diff --git a/src-wsl/metrics.wsl b/src-wsl/metrics.wsl
--- a/src-wsl/metrics.wsl
+++ b/src-wsl/metrics.wsl
PRINT("HELP - for now in the comments at the start of the script");
PRINT("options: --header or -H | -c | -HC | -o | -s");
SKIP
PRINT("HELP - for now in the comments at the start of the script");
PRINT("options: --header or -H | -c | -HC | -o | -s");
SKIP
- ELSE IF filename = "-H" OR filename = "--header" THEN
+ ELSIF filename = "-H" OR filename = "--header" THEN
@WS("filename");@WS(Field_Separator);
@Write_Metrics_List();
@WL("");
@WS("filename");@WS(Field_Separator);
@Write_Metrics_List();
@WL("");
- ELSE IF filename = "-HC" THEN
+ ELSIF filename = "-HC" THEN
C:"Header for comparison";
@WS("filename");@WS(Field_Separator);
@Write_Metrics_List();@WS(Field_Separator);
C:"Header for comparison";
@WS("filename");@WS(Field_Separator);
@Write_Metrics_List();@WS(Field_Separator);
@WS("DIF");@Write_Metrics_List();@WS(Field_Separator);
@WS("%");@Write_Metrics_List();
@WL("");
@WS("DIF");@Write_Metrics_List();@WS(Field_Separator);
@WS("%");@Write_Metrics_List();
@WL("");
- ELSE IF filename = "-o" THEN
+ ELSIF filename = "-o" THEN
C:"set output";
IF Argv = < > THEN
PRINT("argument needed after -o")
C:"set output";
IF Argv = < > THEN
PRINT("argument needed after -o")
opened := opened + 1;
@Write_To(filename)
FI
opened := opened + 1;
@Write_To(filename)
FI
- ELSE IF filename = "-s" THEN
+ ELSIF filename = "-s" THEN
C:"set separator";
IF Argv = < > THEN
PRINT("argument needed after -s")
ELSE
POP(Field_Separator, Argv);
FI
C:"set separator";
IF Argv = < > THEN
PRINT("argument needed after -s")
ELSE
POP(Field_Separator, Argv);
FI
- ELSE IF filename = "-c" THEN
+ ELSIF filename = "-c" THEN
C:"compare two files and dump the comparison";
IF LENGTH(Argv) < 2 THEN
PRINT("two arguments needed after -c")
C:"compare two files and dump the comparison";
IF LENGTH(Argv) < 2 THEN
PRINT("two arguments needed after -c")
@Write_Metrics(metrics);
@WL("");
SKIP
@Write_Metrics(metrics);
@WL("");
SKIP
- FI FI FI FI FI FI
+ FI
OD;
C:"be nice and close all the opened writes";
FOR count := 1 TO opened STEP 1 DO
OD;
C:"be nice and close all the opened writes";
FOR count := 1 TO opened STEP 1 DO