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: 968e49a)
raw | patch | inline | side by side (from parent 1: 968e49a)
author | Doni Pracner <quinnuendo@gmail.com> | |
Sat, 20 Jan 2018 14:56:32 +0000 (15:56 +0100) | ||
committer | Doni Pracner <quinnuendo@gmail.com> | |
Sat, 20 Jan 2018 15:02:59 +0000 (16:02 +0100) |
FermaT has changed @Argv to ARGV for better compatibility
with Scheme implementations. Therefore a change was
needed in the scripts that use command line arguments.
with Scheme implementations. Therefore a change was
needed in the scripts that use command line arguments.
src-wsl/metrics.wsl | patch | blob | history | |
src-wsl/transf-exp.wsl | patch | blob | history | |
src-wsl/transf-min.wsl | patch | blob | history | |
src-wsl/transf-stack.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
filename:="", filename2 := "",
metrics := < >, met2 := < >,
opened := 0,
- Argv := @Argv
+ Argv := ARGV
>:
C:"First one is the script name that is being executed";
Argv := TAIL(Argv);
diff --git a/src-wsl/transf-exp.wsl b/src-wsl/transf-exp.wsl
--- a/src-wsl/transf-exp.wsl
+++ b/src-wsl/transf-exp.wsl
C:"Main program - processes the arguments";
VAR< prog := < >, inifilename := "transf.ini",
filename:="", file := "", inifile:= "",
- Argv := @Argv
+ Argv := ARGV
>:
C:"First one is the script name that is being executed";
Argv := TAIL(Argv);
diff --git a/src-wsl/transf-min.wsl b/src-wsl/transf-min.wsl
--- a/src-wsl/transf-min.wsl
+++ b/src-wsl/transf-min.wsl
VAR< prog := < >, inifilename := "transf.ini",
filename:="", file := "", inifile:= "",
- Argv := @Argv
+ Argv := ARGV
>:
C:"First one is the script name that is being executed";
Argv := TAIL(Argv);
--- a/src-wsl/transf-stack.wsl
+++ b/src-wsl/transf-stack.wsl
VAR< prog := < >, inifilename := "transf.ini",
filename:="", file := "", inifile:= "",
- Argv := @Argv
+ Argv := ARGV
>:
C:"First one is the script name that is being executed";
Argv := TAIL(Argv);