gitweb on Svarog
projekti pod git sistemom za održavanje verzija -- projects under the git version control systemdiff --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
FOREACH Statement DO
IF @ST(@I) = T_A_S THEN
C:"don't need to test for this, works for T_A_S";
- @Trans(TR_Simplify_Action_System, "");
IF @Trans?(TR_Collapse_Action_System) THEN
@Trans(TR_Collapse_Action_System, "");
FI;
OD;
@Close_Input_Port(inifile);
ELSE
- PRINT("ini file (",inifile,") not found.",
+ PRINT("ini file (",inifilename,") not found.",
" it should contain a list of filenames to be converted");
PRINT("you can input a filename now:");
filename := @Read_Line(Standard_Input_Port);