Suppress console messages about sign extension in ioctl system call

git-svn-id: trunk@19241 -

rtl/freebsd/termiosproc.inc

@@ -26,15 +26,16 @@ end;
 
 Function TCSetAttr(fd:cint;OptAct:cint;const tios:TermIOS):cint;
 var
-  nr:cint;
+  nr: TIoCtlRequest;
 begin
   case OptAct of
   {the three constants TIOCSETA, TIOCSETAW and TIOCSETAF are
    unsigned values above $80000000, so that they give range check errors
-   on 32-bit systems }
-   TCSANOW   : nr:=cint(TIOCSETA);
-   TCSADRAIN : nr:=cint(TIOCSETAW);
-   TCSAFLUSH : nr:=cint(TIOCSETAF);
+   on 32-bit systems 
+   Solved by using TIoCtlRequest type for FpIOCtl second parameter }
+   TCSANOW   : nr:=TIOCSETA;
+   TCSADRAIN : nr:=TIOCSETAW;
+   TCSAFLUSH : nr:=TIOCSETAF;
   else
    begin
      fpsetErrNo(ESysEINVAL);