Protected NOT protected?

akee · **Posted:** Sat Jun 18, 2011 6:53 am

Tailbite 1.4.7 with PB 4.51.
Tailbite First.pb and Second.pb. Then run Third.pb. Seems that the protected variable alpha$ gets shared.

First.pb

Code:

Procedure$ First_Private(p1$)
  Protected alpha$ = ""
  alpha$ = p1$ + " first"
  ProcedureReturn alpha$
EndProcedure

ProcedureDLL$ First(p1$)
  ProcedureReturn First_Private(p1$)
EndProcedure

Second.pb

Code:

Procedure$ Seconds_Private(p1$)
  Protected alpha$ = ""
  alpha$ = p1$ + " second"
  ProcedureReturn alpha$
EndProcedure

ProcedureDLL$ Seconds(p1$)
  ProcedureReturn Seconds_Private(p1$)
EndProcedure

Third.pb

Code:

Debug First(Seconds("*"))   ; * second* second first

Procedure$ InFirst(p1$)
  Protected alpha$ = ""
  alpha$ = p1$ + " first"
  ProcedureReturn alpha$
EndProcedure

Procedure$ InSeconds(p1$)
  Protected alpha$ = ""
  alpha$ = p1$ + " second"
  ProcedureReturn alpha$
EndProcedure

Debug InFirst(InSeconds("*"))   ; * second first

ABBKlaus · **Posted:** Sat Jun 18, 2011 10:19 am

Its a known issue (the first one on the list) and has nothing to do with the protected keyword.

akee · **Posted:** Sun Jun 19, 2011 9:43 am

Tanks for the feedback ABBKlaus. Do you know if 4.60 fixes this?

akee · **Posted:** Sun Sep 11, 2011 11:06 am

Just retried this example with 4.60 RC1. This bug is not yet fixed...

gnozal · **Posted:** Mon Sep 12, 2011 9:37 am

akee wrote:

Just retried this example with 4.60 RC1. This bug is not yet fixed...

It is not a PB bug, as PB libraries work fine.
It's a Tailbite issue (viewtopic.php?p=230189) related to the 'double PUSH dword [_PB_StringBasePosition]' in Purebasic.asm when a procedure returns a string.

PureBasic Forum

Protected NOT protected?

Who is online