experimental transformations - added Flag Removal to the auto transfs

[mjc2wsl.git] / src-wsl / transf-exp.wsl

diff --git a/src-wsl/transf-exp.wsl b/src-wsl/transf-exp.wsl
index 5b1bd1076663f924b6c91736545a735b1b7ed6e7..8bc0357c4510f13b0605ea5c0691a5604355e7c9 100755 (executable)
--- a/src-wsl/transf-exp.wsl
+++ b/src-wsl/transf-exp.wsl
@@ -40,6 +40,11 @@ MW_PROC @Process_Prog() ==
                        @Delete  
                FI
        OD;
+       FOREACH Statement DO
+               IF @Trans?(TR_Flag_Removal) THEN
+                       @Trans(TR_Flag_Removal, "");
+               FI
+       OD;
        C:"remove all the comments ";
        FOREACH Statement DO
        IF @ST(@I) = T_Comment THEN