Initial data commit

Task/Call-a-function/FutureBasic/call-a-function-1.basic

@@ -0,0 +1,7 @@
+void local fn MyFunction
+  print @"MyFunction"
+end fn
+
+fn MyFunction
+
+HandleEvents

Task/Call-a-function/FutureBasic/call-a-function-2.basic

@@ -0,0 +1,7 @@
+void local fn MyFunction( arg1 as long, arg2 as long, arg3 as long )
+  print @"MyFunction"
+end fn
+
+fn MyFunction( 1, 2, 3 )
+
+HandleEvents

Task/Call-a-function/FutureBasic/call-a-function-3.basic

@@ -0,0 +1,16 @@
+void local fn MyFunction( count as long, ... )
+  va_list ap
+  long i, value
+
+  va_start( ap, count )
+  for i = 1 to count
+    value = fn va_arglong( ap )
+    print value
+  next
+
+  va_end( ap )
+end fn
+
+fn MyFunction( 3, 12, 24, 36 )
+
+HandleEvents

Task/Call-a-function/FutureBasic/call-a-function-4.basic

@@ -0,0 +1,6 @@
+local fn MultiplyByThree( value as long ) as long
+end fn = value * 3
+
+print fn MultiplyByThree( 13 )
+
+HandleEvents

Task/Call-a-function/FutureBasic/call-a-function-5.basic

@@ -0,0 +1,10 @@
+void local fn MultiplyByThree( value as ^long )
+  *value *= 3
+end fn
+
+long num
+num = 9
+fn MultiplyByThree( @num )
+print num
+
+HandleEvents