diff --git a/rtl/beos/termiosproc.inc b/rtl/beos/termiosproc.inc
index a51e295772..3df62de1b8 100644
--- a/rtl/beos/termiosproc.inc
+++ b/rtl/beos/termiosproc.inc
@@ -26,7 +26,7 @@ end;
 
 Function TCSetAttr(fd:cint;OptAct:cint;const tios:TermIOS):cint;
 var
-  nr:cint;
+  nr:TIOCtlRequest;
 begin
   case OptAct of
    TCSANOW   : nr:=TIOCSETA;
diff --git a/rtl/darwin/termiosproc.inc b/rtl/darwin/termiosproc.inc
index 6da3055811..9e1a645c11 100644
--- a/rtl/darwin/termiosproc.inc
+++ b/rtl/darwin/termiosproc.inc
@@ -25,7 +25,7 @@ end;
 
 Function TCSetAttr(fd:cint;OptAct:cint;const tios:TermIOS):cint;
 var
-  nr:culong;
+  nr:TIOCtlRequest;
 begin
   case OptAct of
    TCSANOW   : nr:=TIOCSETA;
diff --git a/rtl/haiku/termiosproc.inc b/rtl/haiku/termiosproc.inc
index a51e295772..41c28f539e 100644
--- a/rtl/haiku/termiosproc.inc
+++ b/rtl/haiku/termiosproc.inc
@@ -26,7 +26,7 @@ end;
 
 Function TCSetAttr(fd:cint;OptAct:cint;const tios:TermIOS):cint;
 var
-  nr:cint;
+  nr: TIOCtlRequest;
 begin
   case OptAct of
    TCSANOW   : nr:=TIOCSETA;
diff --git a/rtl/linux/termiosproc.inc b/rtl/linux/termiosproc.inc
index 90c54856da..b2e9ae9fa2 100644
--- a/rtl/linux/termiosproc.inc
+++ b/rtl/linux/termiosproc.inc
@@ -15,7 +15,7 @@ end;
 
 Function TCSetAttr(fd:cint;OptAct:cint;const tios:TermIOS):cint;
 var
-  nr:culong;
+  nr:TIOCtlRequest;
 begin
   case OptAct of
    TCSANOW   : nr:=TCSETS;
diff --git a/rtl/netbsd/termiosproc.inc b/rtl/netbsd/termiosproc.inc
index b18790c2ca..ac04fdd77a 100644
--- a/rtl/netbsd/termiosproc.inc
+++ b/rtl/netbsd/termiosproc.inc
@@ -26,7 +26,7 @@ end;
 
 Function TCSetAttr(fd:cint;OptAct:cint;const tios:TermIOS):cint;
 var
-  nr:cint;
+  nr:TIOCtlRequest;
 begin
   case OptAct of
    TCSANOW   : nr:=TIOCSETA;
diff --git a/rtl/openbsd/termiosproc.inc b/rtl/openbsd/termiosproc.inc
index 6892e3f7ad..7148d94edf 100644
--- a/rtl/openbsd/termiosproc.inc
+++ b/rtl/openbsd/termiosproc.inc
@@ -26,7 +26,7 @@ end;
 
 Function TCSetAttr(fd:cint;OptAct:cint;const tios:TermIOS):cint;
 var
-  nr:cint;
+  nr:TIOCtlRequest;
 begin
   case OptAct of
    TCSANOW   : nr:=TIOCSETA;