Procedure Halt [(Errnum : byte] ;
Halt stops program execution and returns control to the calling program. The optional argument Errnum specifies an exit value. If omitted, zero is returned.
None.
Program Example30; { Program to demonstrate the Halt function. } begin Writeln ('Before Halt.'); Halt (1); { Stop with exit code 1 } Writeln ('After Halt doesn''t get executed.'); end.