From a54366fd435e11ef3d594bcf3419df400725dabe Mon Sep 17 00:00:00 2001 From: Tomas Bzatek Date: Thu, 19 Jun 2008 00:10:00 +0200 Subject: Fix crash while executing invalid command --- ULibc.pas | 2 ++ 1 file changed, 2 insertions(+) (limited to 'ULibc.pas') diff --git a/ULibc.pas b/ULibc.pas index 585b7c8..ba60e47 100644 --- a/ULibc.pas +++ b/ULibc.pas @@ -790,6 +790,8 @@ function WCOREDUMP(Status: longint): Boolean; function W_EXITCODE(ReturnCode, Signal: longint): longint; function W_STOPCODE(Signal: longint): longint; +procedure _exit(status: longint); cdecl; external GLIBC_LIB name '_exit'; + function gethostname(name: PChar; len: size_t): Longint; cdecl; external GLIBC_LIB name 'gethostname'; function sigqueue(pid: __pid_t; sig: Longint; val: sigval): Longint; cdecl; external GLIBC_LIB name 'sigqueue'; -- cgit v1.2.3