FB debugger : 2.96 32/64 BIT ..... (2020/02/17)

[Luis Babboni]

May be my mistake is in other place.

This is the code that works in 64 bits but not in 32 bits:

Code: Select all

Dim NPA As Double
Dim ttIndex As ULongInt

NPA=2277960380
ttIndex=NPA Mod(16777216)

Print ttIndex

Sleep

Shows me
0 in 32 bits
13036220 as must be in 64 bits

[srvaldez]

this works

Code: Select all

Dim NPA As Double
Common Shared ttIndex As ULongInt

NPA=2277960380
ttIndex=NPA Mod 16777216LL 'uppercase L is easier to recognize

Print ttIndex

sleep


[Luis Babboni]

this works

Code: Select all

Dim NPA As Double
Common Shared ttIndex As ULongInt

NPA=2277960380
ttIndex=NPA Mod 16777216LL 'uppercase L is easier to recognize

Print ttIndex

sleep


??!!
:-O

Thanks!

[srvaldez]

this works also

Code: Select all

Dim NPA As Double
Common Shared ttIndex As ULongInt

NPA=2277960380
ttIndex=NPA Mod 16777216UL

Print ttIndex

sleep


[sancho2]

Hello Sarg:
I noticed a very strange bug using version 2.91 b1 (32 bit).
If you try to run to cursor on a line were variable = variable, the debugger reports it as an inaccessable line.
Example. Put the cursor on the x = x line and press run to cursor.

Code: Select all

ScreenRes 800, 600, 32
Dim As Byte x
? "hello"

'If x = 12 Then
   x = x
'EndIf
sleep

[St_W]

I you take a look on the intermediate Assembly/C output from the compiler (compile using "-r -g" options) you'll see that no code is generated for "x = x", so there's nothing that could be debugged (-> inaccessible line). So nothing is wrong with FbDebugger in this case.

Anyway, why would one ever write code like "x = x" ?
If you want to add a dummy instruction doing nothing for debugging purposes you could use e.g. "asm nop" instead (for x86 and x64).

[SARG]

Hi all,

Nothing more to say.
@St_W thanks.

[Tourist Trap]

Hi all,

Nothing more to say.
@St_W thanks.

And a longer chain as x=x=x=x=x=x=x=x=x=x=x=x ? Would it be ignored. Just curiosity ;)

[SARG]

Not ignored as there are 10 comparisons (x equal x ?) then in the end the result is assigned to x.

x=x : just an assignement so no generated code

x = x = x : first one comparison then an assignment so obviously some lines of code

[Tourist Trap]

Not ignored as there are 10 comparisons (x equal x ?) then in the end the result is assigned to x.

x=x : just an assignement so no generated code

x = x = x : first one comparison then an assignment so obviously some lines of code

Thanks! So it answers to my question. So if there is no assignement finally (correct number of = signs) this will be ignored. That's good to know.

[SARG]

NO.
There is always an assignment but the compiler is able to see that no code is necessary in this particular case x=x.

Once there are 2 '=' or more there are comparisons and the assignment.
The final result could be 0 or -1 depending of the number of comparisons.

Code: Select all

Dim As Byte x
x=x=x=x:Print x
x=x=x  :Print x
sleep

result = 0 or -1

[sancho2]

If you want to add a dummy instruction doing nothing for debugging purposes you could use e.g. "asm nop" instead (for x86 and x64).

That is exactly what I was doing. I wanted to start stepping through at a certain point under a certain condition, so I needed code inside an if block.
Thanks for the info. I will use asm nop from now on.

Edit:
asm nop doesn't work either.

[AGS]

@SARG
I am looking for a place to put my FB related stuff. And I see you are using the German FreeBASIC site. How do I go about setting up an account on the German FreeBASIC server (you seem to be uploading your stuff to http://users.freebasic-portal.de/sarg/).

[SARG]

Hi AGS,

I sent you an email address of the person who created my account.
As your address is old tell me if you get nothing.

Surprisingly I have not received a message from the forum after your last post ????? I just saw it by chance.

Edit : received message after the ST_W's post.

[St_W]

How do I go about setting up an account on the German FreeBASIC server

Every FreeBASIC programmer can apply to get a free web hosting account on this server to store and publish his/her programming related contents. Just contact the server operator (see email address below).

[...]

E-mail address of the server operator: mail ((at)) freebasic-portal [dot] de