Changeset 750 for to-imperative/trunk/compiler/rfp_asail.rf

Timestamp:

May 22, 2003, 1:41:13 PM (18 years ago)

Author:

orlov

Message:

• Work towards clashes compilation.

File:

• to-imperative/trunk/compiler/rfp_asail.rf (modified) (1 diff)

to-imperative/trunk/compiler/rfp_asail.rf

@@ -82 +82 @@
       } :: e.label,
       ('for ( ; ' <Cond-To-CPP e.cond> '; ' <Step-To-CPP e.step> ')')
-      ('{' (<ASAIL-To-CPP e.body>) e.label '}');
+      ('{' ('{' (<ASAIL-To-CPP e.body>) '}') e.label '}');
     (LABEL (e.label) e.body) =
       {