Function pointers

Now this is neat:

Function my_eq(a:Int,b:Int)
	If a = b-1 Then Return True
	Return False
End Function

Function test_equal(a:Int,b:Int,eq_func(a:Int,b:Int))
	Return eq_func(a,b)
End Function

Print test_equal(1,2,my_eq)

kudos brl!