September Morn Update

Task/Program-termination/ARM-Assembly/program-termination.arm

@@ -0,0 +1,26 @@
+/* ARM assembly Raspberry PI  */
+/*  program ending.s   */
+
+/* Constantes               */
+.equ EXIT,   1                          @ Linux syscall
+
+/* Initialized data */
+.data
+
+/*  code section */
+.text
+.global main
+main:                                   @ entry of program
+    push {fp,lr}                        @ saves registers
+
+OK:
+    @ end program OK
+    mov r0, #0                          @ return code
+    b 100f
+NONOK:
+    @ if error detected end program no ok
+    mov r0, #1                          @ return code
+100:                                    @ standard end of the program
+    pop {fp,lr}                         @restaur  registers
+    mov r7, #EXIT                       @ request to exit program
+    swi 0                               @ perform the system call Linux

Task/Program-termination/BASIC/program-termination-4.basic

@@ -1 +1 @@
-10 IF 1 THEN END
+ 100 IF CONDITION THEN STOP

Task/Program-termination/BASIC/program-termination-5.basic

@@ -1,3 +1 @@
-10 LET a = 1: LET b = 1
-20 IF a = b THEN GO TO 9995
-9995 STOP
+10 IF 1 THEN END

Task/Program-termination/BASIC/program-termination-6.basic

@@ -0,0 +1,3 @@
+10 LET a = 1: LET b = 1
+20 IF a = b THEN GO TO 9995
+9995 STOP

Task/Program-termination/Neko/program-termination.neko

@@ -0,0 +1,10 @@
+/*
+ Program termination, in Neko
+*/
+
+var sys_exit = $loader.loadprim("std@sys_exit", 1)
+
+var return_code = 42
+if true sys_exit(return_code)
+
+$print("Control flow does not make it this far")

Task/Program-termination/Ol/program-termination.ol

@@ -0,0 +1 @@
+(shutdown 0) ; it can be any exit code instead of provided 0

Task/Program-termination/VBA/program-termination.vba

@@ -0,0 +1,5 @@
+'In case of problem this will terminate the program (without cleanup):
+If problem then End
+'As VBA is run within an application, such as Excel, a more rigorous way would be:
+If problem then Application.Quit
+'This will stop the application, but will prompt you to save work.