From 5e5b55ea124ea597f3037d96d31a4a4c17a3e5a2 Mon Sep 17 00:00:00 2001
From: geby <geby@7c85be65-684b-0410-a082-b2ed4fbef004>
Date: Tue, 7 Nov 2023 08:01:07 +0000
Subject: [PATCH] synaser.pas - fix rangecheck error

git-svn-id: https://svn.code.sf.net/p/synalist/code/trunk@273 7c85be65-684b-0410-a082-b2ed4fbef004
---
 synaser.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/synaser.pas b/synaser.pas
index 21ce921..14ce8dc 100644
--- a/synaser.pas
+++ b/synaser.pas
@@ -1,5 +1,5 @@
 {==============================================================================|
-| Project : Ararat Synapse                                       | 007.007.001 |
+| Project : Ararat Synapse                                       | 007.007.002 |
 |==============================================================================|
 | Content: Serial port support                                                 |
 |==============================================================================|
@@ -2427,7 +2427,7 @@ end;
 {$IFNDEF MSWINDOWS}
 function GetSerialPortNames: string;
 const
-  ATTR = {$IFDEF POSIX}$7FFFFFFF{$ELSE}$FFFFFFFF{$ENDIF};
+  ATTR = {$IFDEF POSIX}$7FFFFFFF{$ELSE}longint($FFFFFFFF){$ENDIF};
 var
   sr : TSearchRec;
 begin