Browse Source

* Remove typedness of feinvalidhandle constant to straight constant with typecast in rvalue. mantis #37358

Reasons for original construct unclear and probably historic, added by oro in 2006 as  feinvalidhandle : Thandle =-1 and then modified by Jonas for unsigned thandle types in 2007 to   feinvalidhandle : Thandle =thandle(-1).

git-svn-id: trunk@45790 -
marco 5 years ago
parent
commit
9cae1830e2
1 changed files with 1 additions and 1 deletions
  1. 1 1
      rtl/objpas/sysutils/filutilh.inc

+ 1 - 1
rtl/objpas/sysutils/filutilh.inc

@@ -162,7 +162,7 @@ Const
   fsFromEnd       = 2;
 
   { File errors }
-  feInvalidHandle : THandle = THandle(-1);  //return value on FileOpen error
+  feInvalidHandle = THandle(-1);  //return value on FileOpen error
 
 Type
   TFileSearchOption = (sfoImplicitCurrentDir,sfoStripQuotes);