[Gambas-user] Gambas 3 RC1 CSng project conversion bug
Ron
ron at ...1740...
Mon Mar 28 17:09:16 CEST 2011
On 28-3-2011 16:55, Benoît Minisini wrote:
>> Testing RC1 with code revision 3693
>>
>> Converting a project to Gambas3 doesn't work 100% correct.
>>
>> It seems '+ CSingle' becomes 'CSingleSng'
>>
>> If (RecBuf[6] And&H8) = 0 Then
>> ' [GB2:CSNG] sCelsius = CSng(Hex(RecBuf[5])) +
>> CSng(Hex(Lsr(RecBuf[4], 4))) / 10
>> sCelsius = CSingle(Hex(RecBuf[5]))CSingleSng(Hex(Lsr(RecBuf[4],
>> 4))) / 10
>> Else
>> ' [GB2:CSNG] sCelsius = 0 - (CSng(Hex(RecBuf[5])) +
>> CSng(Hex(Lsr(RecBuf[4], 4))) / 10)
>> sCelsius = 0 -
>> (CSingle(Hex(RecBuf[5]))CSingleSng(Hex(Lsr(RecBuf[4], 4))) / 10)
>> End If
>>
>> Here it seems a 2 step process where the Hex ()is lost:
>>
>> ' [GB2:CSNG] sTrain = (CSng(Hex(RecBuf[8] And&HF)) * 1000 +
>> CSng(Hex(RecBuf[7])) * 10 + CSng(Hex(Lsr(RecBuf[6], 4))))
>> ' [GB2:CSNG] sTrain = (CSingle(Hex(RecBuf[8] And&HF)) *
>> 1000CSingleSng(Hex(RecBuf[7])) *CSingle+ CSng(Hex(Lsr(RecBuf[6], 4))))
>> sTrain = (CSingle(Hex(RecBuf[8] And&HF)) * 1000
>> CSingleSng(Hex(RecBuf[7])) * CSingle + CSnCSinglex(Lsr(RecBuf[6], 4))))
>>
>> Regards,
>> Ron_2nd.
>>
> It should be fixed in the last revision. Can you try?
>
Yes, this is fixed too.
Thanks.
More information about the User
mailing list