Anonymous user
Program termination: Difference between revisions
Added solution for Action!
Puppydrum64 (talk | contribs) |
(Added solution for Action!) |
||
Line 64:
.include "../includeARM64.inc"
</lang>
=={{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>
=={{header|Ada}}==
| |||