-----Messaggio Originale----- 
Da: "Enrico Maria Giordano" <e.m.giord...@emagsoftware.it>
A: "xHarbour Developers Mailing List" 
<xharbour-developers@lists.sourceforge.net>
Data invio: giovedì 28 marzo 2013 15.31
Oggetto: [xHarbour-developers] Bug in OLEDEFAULTARG()


> FUNCTION MAIN()
>
>    LOCAL oExcel := CREATEOBJECT( "Excel.Application" )
>
>    oExcel:WorkBooks:Add( OLEDEFAULTARG() )
>
>    oExcel:Visible = .T.
>
>    RETURN NIL
>
> Error BASE/3101  : __OBJGETMSGFULLLIST
>
> It worked fine in the past.

I found where the problem is. In source/rtl/tclass.prg

STATIC PROCEDURE DivertConstructorCall( ... )

// From DIVERT parent!
   LOCAL oClassInstance

if I change it to (to pacify the warning)

STATIC PROCEDURE DivertConstructorCall( ... )

// From DIVERT parent!
   LOCAL oClassInstance := NIL

then it errors out. I don't understand. Is something related to ( ...) 
variadic argument list?

EMG

--
EMAG Software Homepage:     http://www.emagsoftware.it
The EMG's ZX-Spectrum Page: http://www.emagsoftware.it/spectrum
The Best of Spectrum Games: http://www.emagsoftware.it/tbosg
The EMG Music page:         http://www.emagsoftware.it/emgmusic 


------------------------------------------------------------------------------
Own the Future-Intel&reg; Level Up Game Demo Contest 2013
Rise to greatness in Intel's independent game demo contest.
Compete for recognition, cash, and the chance to get your game 
on Steam. $5K grand prize plus 10 genre and skill prizes. 
Submit your demo by 6/6/13. http://p.sf.net/sfu/intel_levelupd2d
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers

Reply via email to