paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-19 23:19:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fixed the first (of many) ioctls that make building the IDE hard.

Browse Source
This commit is contained in:
marco 2000-10-09 16:35:51 +00:00
parent c1e14ef033
commit 48668a2417
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/unix/sysunix.inc
View File

@ -408,7 +408,7 @@ var
Data : array[0..255] of byte; {Large enough for termios info}
begin
{$ifdef BSD}
Do_IsDevice:=(do_SysCall(syscall_nr_ioctl,handle,$5401,longint(@data))=0);
Do_IsDevice:=(do_SysCall(syscall_nr_ioctl,handle,$5413,longint(@data))=0);
{$else}
sr.reg2:=Handle;
sr.reg3:=$5401; {=TCGETS}
@ -738,7 +738,10 @@ End.
{
$Log$
Revision 1.2 2000-09-18 13:14:51 marco
Revision 1.3 2000-10-09 16:35:51 marco
* Fixed the first (of many) ioctls that make building the IDE hard.
Revision 1.2 2000/09/18 13:14:51 marco
* Global Linux +bsd to (rtl/freebsd rtl/unix rtl/linux structure)
Revision 1.6 2000/09/11 13:48:08 marco