AIDE

[tomsmart1]

Ich habe es heute noch einmal getestet.

Dieser Code verbrät 512 Kilobyte Speicher der nicht mehr freigegeben wird:

Code:

optimize 5
Syntax 6

XINCLUDE "ab3support.include.ab3"

If (AB3Support_OpenLib{2}) ; (!) put your min version here if needed!
  ; (!) place your built-in demo here
  NPrint "AB3Support.library is open!"
  *pft.prefixtree = pftlib_Create{524288,0}
  NPrint "Allocated pft:",Hex$(*pft)

  pftlib_Free{*pft}
Else
  NPrint "Unable to open lib!"
EndIf
End

Auszug aus dem Shell mitschnitt:

Code:

Sonntag 09-Aug-15  13:49:09
DH10: > avail flush
Type  Available    In-Use   Maximum   Largest
chip     950536     81656   1032192    935232
fast   66180048  17181744  83361792  65246080
total  67130584  17263400  84393984  65246080

DH10:> mavail flush
Type  Available    In-Use   Maximum   Largest
chip     950536     81656   1032192    935232
fast   66180048  17181744  83361792  65246080
total  67130584  17263400  84393984  65246080

DH10:> dh00:ab3supporttest
AB3Support.library is open!
Allocated pft:08FDB52C
Allocated pft:08FDB52C

DH10:> avail flush
Type  Available    In-Use   Maximum   Largest
chip     950536     81656   1032192    935232
fast   65634112  17727680  83361792  64717352
total  66584648  17809336  84393984  64717352

DH10:> avail flush
Type  Available    In-Use   Maximum   Largest
chip     950536     81656   1032192    935232
fast   65634112  17727680  83361792  64717352
total  66584648  17809336  84393984  64717352

Dieser Code verbrät nur 120 Byte:

Code:

optimize 5
Syntax 6

XINCLUDE "prefixtree.include.ab3"


  *pft.prefixtree = pft_Create{524288}
  NPrint "Allocated pft:",Hex$(*pft)

  pft_Free{*pft}
  NPrint "Allocated pft:",Hex$(*pft)
End