September 2017 Update

2017-09-23 10:01:46 +02:00 · 2017-09-23 10:01:46 +02:00 · ba8067c3b7
commit ba8067c3b7
parent bba7bfd280
14570 changed files with 153136 additions and 63871 deletions
--- a/Task/Exceptions/Gambas/exceptions.gambas
+++ b/Task/Exceptions/Gambas/exceptions.gambas
@ -0,0 +1,30 @@
+Public Sub Main()
+Dim iInteger As Integer
+
+MakeError
+DivError
+
+iInteger = "2.54"
+
+Catch
+  Print Error.Text
+
+End
+'______________________
+Public Sub DivError()
+
+Print 10 / 0
+
+Catch
+  Print Error.Text
+
+End
+'______________________
+Public Sub MakeError()
+
+Error.Raise("My Error")
+
+Catch
+  Print Error.Text
+
+End