Halt

Stop program execution.

Declaration

Source position: systemh.inc line 1626

  procedure Halt(errnum: TExitCode);
  procedure Halt;

Description

Halt stops program execution and returns control to the calling program. The optional argument Errnum specifies an exit value. If omitted, zero is returned.

Note that this skips any try/finally (implicit or explicit) or try/except blocks, thus may result in memory leaks. Finalization sections of units will be executed.

Errors

None.

See also

Name Description
Exit Exit current subroutine.

Example

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.