Nasty hack: freeing strings

tinman · Post by **tinman** » Thu Jun 12, 2003 2:06 pm

Possibly useful for those who have large amounts of dynamic data.

Structure String
    StructureUnion
        String.s
        Pointer.l
    EndStructureUnion
EndStructure

Procedure FreeString(*free_me.String)
!   MOV     edx, dword [esp+0]
!   MOV     edx, dword [edx]
    ; For PB<3.70
;!   CALL    PB_FreeString
!   CALL    SYS_FreeString
    *free_me\Pointer = 0
EndProcedure

idStefke · Post by **idStefke** » Sat Jun 14, 2003 8:00 pm

Doesn't work with PB V3.70

Karbon · Post by **Karbon** » Sat Jun 14, 2003 8:23 pm

heh. Again, post the specific error/problem and maybe someone can help you. The "Doesn't work" posts sometimes don't get much attention..

Good luck!

tinman · Post by **tinman** » Sun Jun 15, 2003 2:39 am

Karbon wrote:heh. Again, post the specific error/problem and maybe someone can help you. The "Doesn't work" posts sometimes don't get much attention.

Yes, especially when it does work with with PB 3.70. Or does here.

Anyway. this topic is a nasty hack. I would recommend that no-one uses it ever.

Really.

PureBasic Forums - English

Nasty hack: freeing strings

Nasty hack: freeing strings

Re: Nasty hack: freeing strings