Changeset 2314 for to-imperative/trunk/samples/Dir/read_dir1.rf

Timestamp:

Feb 2, 2007, 3:51:05 AM (14 years ago)

Author:

orlov

Message:

• Fixed formatting.

File:

• to-imperative/trunk/samples/Dir/read_dir1.rf (modified) (1 diff)

to-imperative/trunk/samples/Dir/read_dir1.rf

@@ -5 +5 @@
   $iter # \{
     <Read-Dir s.dir> : e.file,
-    {
-      e.file : 'read_' e '1.' s s =
-        <PrintLN "- a match for \"read_*1.??\" found">;;
-    };
+      {
+        e.file : 'read_' e '1.' s s =
+          <PrintLN "- a match for \"read_*1.??\" found">;;
+      };
   };