* allow setting a heap size of exactly 1024 bytes with the $M directive, since

  that's a valid heap size value for the -Ch command line option



git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@28026 3ad0048d-3df7-0310-abae-a5850022a9f2

1 files changed, 1 insertions, 1 deletions

diff --git a/compiler/scandir.pas b/compiler/scandir.pas
index 1ac720ced8..7facdc60d2 100644
--- a/compiler/scandir.pas
+++ b/compiler/scandir.pas
@@ -722,7 +722,7 @@ unit scandir;
             current_scanner.readchar;
             current_scanner.skipspace;
             l:=current_scanner.readval;
-            if l>1024 then
+            if l>=1024 then
               heapsize:=l;
           end;
       end;