允许向 REF 变量传递 NULL 指针(使用 /vo7),但不鼓励这样做。
您必须确保被调用的函数会对 REF 参数的 NULL 指针进行检查。
下面的代码展示了如何在调用的函数中添加一个测试
FUNCTION Start() AS VOID
LOCAL n AS INT
n := 1
? TempRef(10 , n) // 11
? TempRef(10 , NULL) // 1976
RETURN
FUNCTION TempRef(a AS INT, r REF INT) AS INT
IF @r == NULL // Check for NULL pointer!
RETURN 1976
END IF
RETURN a + r