[Omnetpp-l] Problem compiling omnet with tcl-8.6

[Javier Díaz <javier_diaz at xxx>]

Hello,

I have upgraded my linux distro (Mandriva) to its latest version, 
Mandriva 2009.1 and it seems they have upgraded Tcl/Tk to 8.6 version.

The problem is that it seems omnet doesn't supports this version, when I 
recompile, appears this error:

===== Compiling tkenv 
====                                                                                                   

cd /home/javi/omnetpp-4.0/src/tkenv && 
make                                                                                  

make[2]: se ingresa al directorio 
`/home/javi/omnetpp-4.0/src/tkenv'                                                         

g++ -c -O2 -DNDEBUG=1 -fno-stack-protector -fPIC  -DXMLPARSER=libxml 
-DWITH_PARSIM -DWITH_NETBUILDER -I/home/javi/omnetpp-4.0/include 
-I/home/javi/omnetpp-4.0/include/platdep -I../envir -I../layout 
-I../common -I/usr/include/tcl8.6  -DBUILDING_TKENV 
-DOMNETPP_IMAGE_PATH="\"./bitmaps;./images;/home/javi/omnetpp-4.0/images\"" 
tkenv.cc -o 
/home/javi/omnetpp-4.0/out/gcc-release/src/tkenv/tkenv-e.o                                                                                                        

tkenv.cc: In member function 'virtual void 
Tkenv::run()':                                                                    

tkenv.cc:262: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc: In member function 'void Tkenv::newNetwork(const 
char*)':                                                         
tkenv.cc:702: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc: In member function 'void Tkenv::newRun(const char*, 
int)':                                                        
tkenv.cc:755: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc: In member function 'void 
Tkenv::updateInspectors()':                                                               

tkenv.cc:851: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc:854: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc:857: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc: In member function 'void 
Tkenv::updateNetworkRunDisplay()':                                                        

tkenv.cc:892: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc:895: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc: In member function 'void 
Tkenv::updateSimtimeDisplay()':                                                           

tkenv.cc:903: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc:906: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc:912: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc:916: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc:920: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc:925: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc: In member function 'void 
Tkenv::updateNextModuleDisplay()':                                                        

tkenv.cc:947: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc: In member function 'void 
Tkenv::clearNextModuleDisplay()':                                                         

tkenv.cc:952: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc: In member function 'void 
Tkenv::updatePerformanceDisplay(Speedometer&)':                                           

tkenv.cc:959: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc:961: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc:963: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc: In member function 'void 
Tkenv::clearPerformanceDisplay()':                                                        

tkenv.cc:968: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc:969: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc:970: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                               
tkenv.cc: In member function 'void Tkenv::printEventBanner(cMessage*, 
cSimpleModule*)':                                     
tkenv.cc:1005: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                              
tkenv.cc: In member function 'virtual void 
Tkenv::simulationEvent(cMessage*)':                                               

tkenv.cc:1169: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                              
tkenv.cc: In member function 'virtual void 
Tkenv::messageSent_OBSOLETE(cMessage*, 
cGate*)':                                 
tkenv.cc:1201: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'                                              
tkenv.cc: In member function 'virtual void 
Tkenv::componentMethodBegin(cComponent*, cComponent*, const char*, 
__va_list_tag*)':
tkenv.cc:1320: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc:1343: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc:1361: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc:1374: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc:1384: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc: In member function 'void Tkenv::animateSend(cMessage*, cGate*, 
cGate*)':
tkenv.cc:1551: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc: In member function 'void Tkenv::animateSendDirect(cMessage*, 
cModule*, cGate*)':
tkenv.cc:1657: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc:1677: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc:1695: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc:1714: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc: In member function 'void Tkenv::animateDelivery(cMessage*)':
tkenv.cc:1739: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc: In member function 'void Tkenv::animateDeliveryDirect(cMessage*)':
tkenv.cc:1762: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc: In member function 'void Tkenv::performAnimations()':
tkenv.cc:1772: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc: In member function 'void Tkenv::confirm(const char*)':
tkenv.cc:1807: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc: In member function 'bool Tkenv::inputDialog(const char*, const 
char*, const char*, const char*, std::string&, bool&)':
tkenv.cc:1858: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc:1862: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc:1866: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
tkenv.cc: In member function 'virtual bool Tkenv::askyesno(const char*)':
tkenv.cc:1896: error: 'struct Tcl_Interp' no tiene un miembro llamado 
'result'
make[2]: *** 
[/home/javi/omnetpp-4.0/out/gcc-release/src/tkenv/tkenv-e.o] Error 1
make[2]: se sale del directorio `/home/javi/omnetpp-4.0/src/tkenv'
make[1]: *** [tkenv] Error 2
make[1]: se sale del directorio `/home/javi/omnetpp-4.0'
make: *** [allmodes] Error 2

The question is if it is posible to manually change something in 
tkenv.cc code to manage to compile it, because it seems more easy to 
repair the problem than to downgrading tck/tk to 8.5.

Thanks in advance,
Javier
_______________________________________________
Omnetpp-l mailing list
Omnetpp-l at xxx
http://lists.omnetpp.org/mailman/listinfo/omnetpp-l