Program termination: Difference between revisions

=={{header|Action!}}==

<lang Action!>PROC Main()

DO

IF Rand(0)=10 THEN

PrintE("Terminate program by Break() procedure")

Break()

FI

OD

PrintE("This is a dead code")

RETURN</lang>

{{out}}

[https://gitlab.com/amarok8bit/action-rosetta-code/-/raw/master/images/Program_termination.png Screenshot from Atari 8-bit computer]

<pre>

Terminate program by Break() procedure

RETURN

Error: 128

</pre>