[PB5.22LTSX86] Problem with debugger to Exe

[Falko]

Sorry for this link in germany, but freak can read this

http://forums.purebasic.com/german/view ... 9d#p321319

My curl-program, if compiled to an exe with "debug" in every lines, makes problems for me.
it seems, into the exe are all lines with debug erased.

is it a bug?

(sorry my english, i hope you understand this)

Regards,
Falko

[Shield]

Well, of course the "Debug foo" lines are excluded from the final exe (i.e. without debug information).
That's how it has always been and I'm sure it's mentioned in the help.

[Falko]

Okay, you're right. In the help it is. This is me before never noticed until now.
Fred could just remove the command "debug" for the exe instead of a functioning line yet. But it seems not to go, I think.

Translated with google

[Shield]

Well, it does make sense to remove the entire line. Of course there are some arguments
against that behavior, but I'd say it's safer to remove the entire line than to risk
having debug code in the final executable.

Also, to change this in PB would break way too many sources.

[PB]

> Fred could just remove the command "debug" for the exe instead of a functioning line

No, because that breaks apps. The following would give a syntax error for line 4:

Code: Select all

OpenWindow(0,200,200,200,100,"test",#PB_Window_SystemMenu)
Repeat
  ev=WaitWindowEvent()
  Debug ev
Until ev=#PB_Event_CloseWindow

Don't use Debug for actual code. Use it to display debug info, as intended.

[Falko]

But here you can remove the entire line of the compiler because it makes no sense
to leave alone a variable.
I can already imagine that the compiler could distinguish whether a variable or a command is checked with debug.

Otherwise, I mus agree with you.

(translate with google)

[Shield]

So...

Code: Select all

CompilerIf #PB_Compiler_Debugger
	Macro DebugAny
		Debug 
	EndMacro
CompilerElse
	Macro DebugAny
		
	EndMacro
CompilerEndIf

Procedure.i Foo()
	PrintN("Test")
EndProcedure

Define var.i = 10

DebugAny OpenConsole()
DebugAny Foo()
Debug 10
Debug var

Input()

Add 'DebugAny' as a custom keyword and you're all set.

[Falko]

Hehe...

Thank you for the virtual Debugger .