[Gambas-user] If x <> +Inf Then [Error]

[vuott at tutanota.com]

...even so:

   If a[i] <> (+Inf) Then




19 apr 2023, 01:05 da adamnt42 at gmail.com:

>
> I think, from memory you need to use
>
>
> If (x <> +Inf) then
>
>
> bruce
>
> On 19/4/23 8:13 am, Jussi Lahtinen      wrote:
>
>> I can confirm. The error is "THEN expected". IE the code is          not parsed properly.
>>
>> Jussi
>>
>>
>> On Wed, Apr 19, 2023 at          12:48 AM Martín <>> mbelmonte at belmotek.net>> > wrote:
>>
>>> Hi,
>>>  
>>>  There maybe are an error in the evaluation of expression:
>>>  
>>>  If x <> +Inf Then ...
>>>  
>>>  To reproduce the error you can use this code (it occurs in          3.18.2 & 
>>>  3.18.90 but not in 3.18.0)
>>>  
>>>  Public Sub Form_Open()
>>>  
>>>     Dim i As Integer
>>>     'Dim inFinito As Integer = (2 ^ 31) - 1
>>>     Dim inFinito As Integer = +Inf
>>>     Dim a As New Integer[]
>>>  
>>>     For i = 0 To 9
>>>       a.Add(Rand(0, inFinito))
>>>     Next
>>>  
>>>     For i = 0 To 9
>>>       'If a[i] <> +Inf Then ' it doesn't works
>>>       If a[i] <> inFinito Then ' it works
>>>  
>>>         Print "Continua jugando"
>>>       Else
>>>         Print "Fin del juego"
>>>       Endif
>>>     Next
>>>  
>>>  End
>>>  
>>>  
>>>  Best regards
>>>  
>>>  Martin.
>>>  
>>>  
>>>  ----[ >>> http://gambaswiki.org/wiki/doc/netiquette>>>  ]----
>>>
>>
>> ----[ >> http://gambaswiki.org/wiki/doc/netiquette>>  ]----
>>

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.gambas-basic.org/pipermail/user/attachments/20230419/dd61081c/attachment.htm>