Erro no Inkey()?

[asimoes]

Pessoal,

Recebi este erro de um sistema que eu faço manutenção na função inkey()
achei estranho ser no INKEY(0)

Error BASE/1301 Falha Object destructor: Reference to freed block
Called from ->INKEY(0)

[Toledo]

Alexandre, você descobriu algo sobre este erro?

Abraços,

[Kapiaba]

http://comments.gmane.org/gmane.comp.la ... .devel/942

Aproveitando o tópico, achei este comando, o que ele faz exatamente?

Código: Selecionar todos

hb_gcUnlock()

Obg.abs.

[asimoes]

Olá Toledo,

Este problema não ocorreu novamente, não sei se é pelo fato de eu sempre ter uma compilação mais recente do harbour.

[Kapiaba]

Código: Selecionar todos

#include "FiveWin.ch"  // comment

proc main()

  ? XHGTK_TREE_ITER_NEW()

return nil

#pragma begindump

HB_FUNC( XHGTK_TREE_ITER_NEW )

   {
    void * treeiter = (void *) hb_gcAlloc(sizeof(void *), NULL);
    hb_retptr(treeiter);
   }

#pragma enddump

/*
xHGTK is not compatible with current Harbour yet. 

If I change hb_gcAlloc to hb_gcAllocate, xHGTK become incompatible with xHarbour. 
*/