all tasks

Task/Undefined-values/BBC-BASIC/undefined-values-1.bbc

@@ -0,0 +1,8 @@
+      ok% = TRUE
+      ON ERROR LOCAL IF ERR<>26 REPORT : END ELSE ok% = FALSE
+      IF ok% THEN
+        PRINT variable$
+      ELSE
+        PRINT "Not defined"
+      ENDIF
+      RESTORE ERROR

Task/Undefined-values/BBC-BASIC/undefined-values-2.bbc

@@ -0,0 +1,11 @@
+      PROCtest
+      END
+
+      DEF PROCtest
+      LOCAL array()
+      IF !^array() < 2 PRINT "Array is undefined"
+      DIM array(1,2)
+      IF !^array() > 1 PRINT "Array is defined"
+
+      !^array() = 0 : REM Set array to undefined state
+      ENDPROC