Page 1 of 1

crash in empty TLinkList

Posted: Mon Mar 23, 2015 11:21 am
by AntoninoP
Hello,
in my code I have these lines (compressed):

Code: Select all

   oTree := TLinkList():New()
   if ...someCondition can be false... 
      ..add some tree items...
   endif
   oTree:Expand()
and crashes with this error:

Code: Select all

Application
===========
   Path and name: C:\fwh\samples\treebrw.exe (32 bits)
   Size: 2,947,584 bytes
   Compiler version: Harbour 3.2.0dev (r1412151448)
   FiveWin  Version: FWH 15.03
   Windows version: 6.1, Build 7601 Service Pack 1

   Time from start: 0 hours 0 mins 0 secs 
   Error occurred at: 03/23/15, 12:16:45
   Error description: Error BASE/1004  No exported method: NLEVEL
   Args:
     [   1] = U   

Stack Calls
===========
   Called from:  => NLEVEL( 0 )
   Called from: .\source\classes\LINKLIST.PRG => (b)EVAL( 121 )
   Called from: .\source\classes\LINKLIST.PRG => TLINKLIST:EXPAND( 202 )
   Called from: XXX.prg => MAKETREE( 42 )
   Called from: XXX.prg => MAIN( 12 )

System
======
   CPU type: Intel(R) Core(TM)2 Duo CPU     E7400  @ 2.80GHz 75 Mhz
   Hardware memory: 4095 megs

   Free System resources: 90 %
        GDI    resources: 90 %
        User   resources: 90 %

   Windows total applications running: 5
      1 ,                                                                                                     
      2 , C:\Windows\syswow64\SHLWAPI.dll                                                                     
      3 , C:\fwh\samples\treebrw.exe                                                                          
      4 DDE Server Window, C:\Windows\syswow64\ole32.dll                                                                       
      5 GDI+ Window, C:\Windows\WinSxS\x86_microsoft.windows.gdiplus_6595b64144ccf1df_1.1.7601.18455_none_72d576ad8665e8 

Variables in use
================
   Procedure     Type   Value
   ==========================
   NLEVEL
     Param   1:    O    Class: ERROR
   (b)EVAL
     Local   1:    U    
     Local   2:    U    
   TLINKLIST:EXPAND
     Param   1:    B    {|| ... }
     Local   1:    U    
     Local   2:    U    
     Local   3:    U    
     Local   4:    U    
     Local   5:    U    
     Local   6:    U    
   MAKETREE
     Local   1:    N    1000
   MAIN
     Local   1:    O    Class: TLINKLIST
     Local   2:    U    

Linked RDDs
===========
   DBF
   DBFFPT
   DBFBLOB
   DBFCDX
   DBFNTX

DataBases in use
================

Classes in use:
===============
     1 ERROR
     2 HBCLASS
     3 HBOBJECT
     4 TLINKLIST
     5 TREG32

Memory Analysis
===============
      222 Static variables

   Dynamic memory consume:
      Actual  Value:          0 bytes
      Highest Value:          0 bytes