浏览代码

Added test to check if function pointers in types are working

Ronny Otto 11 年之前
父节点
当前提交
22618ae7cc
共有 1 个文件被更改,包括 16 次插入0 次删除
  1. 16 0
      tests/framework/language/pointer_01.bmx

+ 16 - 0
tests/framework/language/pointer_01.bmx

@@ -0,0 +1,16 @@
+Rem
+	This test checks:
+	- if function pointers are possible
+End Rem
+SuperStrict
+
+Import BRL.StandardIO
+
+
+Type MyType
+	Field _func:int()
+
+	Method Run:int()
+		if _func then _func()
+	End Method
+End Type