Higher-order functions: Difference between revisions

Content added Content deleted

Inline

@@ Line 2,554: / Line 2,554: @@
             Setlength ( __,  length ( x ) );
-            FOR k := Low  ( x ) to High ( x ) DO
+            FOR k := Low  ( x ) TO High ( x ) DO
                     __ [ k ] := x [ High ( x ) - k ] ;
@@ Line 2,585: / Line 2,585: @@
             Setlength ( __, High ( x ) );
-            FOR k := Low  ( x ) + 1 to High ( x ) DO
+            FOR k := Low  ( x ) + 1 TO High ( x ) DO
                     __ [ k - 1 ] := x [ k ] ;
@@ Line 2,607: / Line 2,607: @@
             Setlength ( __, y );
-            FOR k := Low  ( x ) to y - 1 DO
+            FOR k := Low  ( x ) TO y - 1 DO
                     __ [ k ] := x [ k ] ;