Fix crash while executing invalid command

1 files changed, 2 insertions, 0 deletions

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';