[X# 3] Misleading error message calling VODBRecordInfo

[hpetriffer]

For the following code

function Start() as void strict
    local u := #Test as usual

    VODBRecordInfo(1, 0, @u)

	Console.ReadLine()
	return

I get the following errors:

Argument 2: cannot convert from 'int' to 'usual'
A REF or OUT value must be an assignable variable
Parameter 2 needs a(n) 'RefReadOnly' modifier. This modifier was automatically added.

It seems that the parameter 2 is a problem, but the real problem is the '@' for the third parameter

XSharpTests.zip

[RobertvanderHulst]

HansJoerg,
The problem is that there are 2 overloads:

FUNCTION VoDbRecordInfo(kInfoType AS DWORD,nRecID IN USUAL,ptrRetVal REF USUAL) AS LOGIC
FUNCTION VoDbRecordInfo(kInfoType AS DWORD,nRecID IN USUAL,ptrRetVal AS USUAL) AS LOGIC

And apparently the @ parameter is not properly matched.
For that to work you need to enable compiler option /vo6 and compile in unsafe mode.

I will check to see if I can work around that

[cpyrgas]

Guys, it's actually the /vo7 compiler option, but that's not the problem, problem is that the 2nd parameter is defined in X# 3 with "IN", so it also requires an argument by reference. Robert, I guess this was done accidentally for this parameter?

[RobertvanderHulst]

The /vo6 was a typo. Sorry about that.
However, the IN was not done accidentally. The parameter is not modified inside the function, and this is the way to document that.
If the 3rd parameter is correct then the compiler automatically generate a USUAL for the literal value and passes that to the function.

 LOCAL u := "123" AS USUAL
 VODbRecordInfo(1, 2, @u) 

becomes

__Usual u;
u = "123";
__Usual nRecID;
nRecID = 2;
XSharp.RT.Functions.VoDbRecordInfo(1u, in nRecID, &u);

[cpyrgas]

Ah right, IN params are passed by reference, but the syntax is the same as passing by value. Should had remembered pointing that out in my session last year :). Guess the resolve mechanism got confused by the same thing as me..