macos - Delphi 中的 TIOCEXCL

Question

我正在将 MacOS 的一些旧 comport 代码从 C++ Builder 转换为 Delphi 10.4

if (ioctl(handle, TIOCEXCL) == -1)
{
    close(handle);
    return false;
}

但是 TIOCEXCL 似乎没有在 Delphi 中定义，可以安全地假设定义为 _IO('t',13) 的 TIOCEXCL 总是 $2000740D