Seite 1 von 1

PeeKS - Fehler ohne optionales Flag

Verfasst: 29.11.2012 20:59
von _JON_
Mir gerade aufgefallen, das PeeKS ohne gesetztes Flag cashed anstatt einen leeren String wieder zugeben

Code: Alles auswählen

*buffer = AllocateMemory(8)

PeekS(*buffer, -1, #PB_Unicode)
PeekS(*buffer, -1, #PB_Ascii)

PeekS(*buffer, -1) ;crash
Compiler: PB 5.00 x86/x64 Ascii/Unicode

Re: PeeKS - Fehler ohne optionales Flag

Verfasst: 29.11.2012 21:18
von bobobo
macht nichts.
am 21.12. ist eh Schluß :bounce:

Re: PeeKS - Fehler ohne optionales Flag

Verfasst: 29.11.2012 21:36
von ts-soft
Hab den Bug mal im engl. Forum gemeldet:
http://www.purebasic.fr/english/viewtop ... 61#p396861

Re: PeeKS - Fehler ohne optionales Flag

Verfasst: 29.11.2012 22:15
von _JON_
bobobo hat geschrieben:macht nichts.
am 21.12. ist eh Schluß :bounce:
Ach können wir das nicht etwas verschieben? Obwohl wir könnten ja auch Weihnachten vorziehen :D

@ts-soft
Danke :allright:

Re: PeeKS - Fehler ohne optionales Flag

Verfasst: 30.11.2012 13:03
von mk-soft
Der 21.12.2012 ist nur der Übungstag für den nächsten Untergang

Workaround:

Code: Alles auswählen

;- Workaround Peeks PB v5.00
#PB_ModePeeks = #PB_Compiler_Unicode + 8
Procedure.s MyPeeks(*buffer, len, type)
  ProcedureReturn PeekS(*buffer, len, type)
EndProcedure

Macro PeekS(buffer, len = -1, type = #PB_ModePeeks)
  MyPeekS(buffer, len, type)
EndMacro
; --------------------------

*buffer = AllocateMemory(8)
Debug PeekS(*buffer, -1)