tsiginfo

type tsiginfo = record

  si_signo: LongInt;

Signal number

  si_errno: LongInt;

Error code

  si_code: LongInt;

Extra code (?)

  _sifields: record

Extra signal information fields

    case LongInt of

      0: (

          _pad: array [0..(SI_PAD_SIZE)-1] of LongInt;

Padding element

        );

      1: (

          _kill: record

Signal number (or status)

            _pid: pid_t;

Sending process ID

            _uid: uid_t;

Sending User ID

          end;

        );

      2: (

          _timer: record

Default timer

            _timer1: DWord;

Timer 1 (system time)

            _timer2: DWord;

Timer 2 (user time)

          end;

        );

      3: (

          _rt: record

Posix compatibility record

            _pid: pid_t;

Sending process ID

            _uid: uid_t;

Sending User ID

            _sigval: pointer;

Signal value

          end;

        );

      4: (

          _sigchld: record

SIGCHLD signal record

            _pid: pid_t;

Sending process ID

            _uid: uid_t;

Sending User ID

            _status: LongInt;

Signal number (or status, SIGCHLD)

            _utime: clock_t;

User time

            _stime: clock_t;

System time

          end;

        );

      5: (

          _sigfault: record

SIGILL, SIGFPE, SIGSEGV, SIGBUS record

            _addr: pointer;

Address (SIGILL, SIGFPE, SIGSEGV, SIGBUS)

          end;

        );

      6: (

          _sigpoll: record

SIGPOLL record

            _band: LongInt;

SIGPOLL band

            _fd: LongInt;

SIGPOLL file descriptor

          end;

        );

  end;

end;