Initial data commit

Task/Repeat/Gambas/repeat.gambas

@@ -0,0 +1,28 @@
+Public Sub Main()
+
+    RepeatIt("RepeatableOne", 2)
+
+    RepeatIt("RepeatableTwo", 3)
+
+End
+
+'Cannot pass procedure pointer in Gambas; must pass procedure name and use Object.Call()
+Public Sub RepeatIt(sDelegateName As String, iCount As Integer)
+
+    For iCounter As Integer = 1 To iCount
+        Object.Call(Me, sDelegateName, [])
+    Next
+
+End
+
+Public Sub RepeatableOne()
+
+    Print "RepeatableOne"
+
+End
+
+Public Sub RepeatableTwo()
+
+    Print "RepeatableTwo"
+
+End