diff --git a/src/system/Files.Mod b/src/system/Files.Mod
index dce692c5..1d6ea549 100644
--- a/src/system/Files.Mod
+++ b/src/system/Files.Mod
@@ -655,6 +655,7 @@ Especially Length would become fairly complex.
           tail := 1;
         ELSE
           tail := Strings.Length(Platform.nl);
+        END;
         b := TRUE
       ELSE
         x[i] := ch;