Changeset 689 for to-imperative/trunk/samples/Access/left.rf

Timestamp:

Apr 29, 2003, 4:03:35 AM (18 years ago)

Author:

orlov

Message:

• All Words are changed to Chars sequences, so tests work with the current runtime version.

File:

• to-imperative/trunk/samples/Access/left.rf (modified) (1 diff)

to-imperative/trunk/samples/Access/left.rf

@@ -3 +3 @@
 Main =
   {
-    <PrintLN <Left 0 0 'abc'>>, <PrintLN <Left 2 3 'abcdef'>>, <PrintLN <Left 2 3 ''>>;
-    <PrintLN "Branch 1 failed">;
+    <PrintLN <Left 0 0 'abc'>>,
+      <PrintLN <Left 2 3 'abcdef'>>,
+      <PrintLN <Left 2 3 ''>>;
+    <PrintLN 'Branch 1 failed'>;
   };