Xotcl December 2003

xotcl@alice.wu.ac.at

9 participants
17 discussions

how to track a segmentation fault problem in Xotcl?
by Catherine Letondal 04 Jan '04

04 Jan '04

Hi, I have just re-installed Xotcl 1.0.2 version and succedeed in running my application with some minor changes since the last xotcl version I used on this platform (Sparc/Solaris 7) was the 0.9 :-) I have a segmentation fault that occurs when a command is called from a Tk menu. The command is attached to the popup by a: add command -command statement on a menu Tk widget that is raised by a tk_popup. However, the very same command, when called from the tcl (xowish) interpreter, works and does not produce any core dump. And most menu items also work well. So my question is: how do I debug such a situation? Thanks for any help... -- Catherine Letondal -- Pasteur Institute Computing Center

3 7

Bug or feature in 1.1.1. Access to subobjects
by Artur Trzewik 31 Dec '03

31 Dec '03

Hi! I have discovered some interesting change in 1.1.1 that I could not find in ChangeLog. In 1.1.1 one can access to subobject as method call Example b::a can be produced as b a My problem is that I have "a" as method and as subobject from b. Can I force "b" to invoke method "a" and not return subobject "a"? Artur Trzewik Example: % [artur@localhost xotclIDE]$ /opt/tcl845/bin/tclsh8.4 % package require XOTcl 1.1 % namespace import xotcl::* % Class A ::A % Class B ::B % B create b ::b % A create b::a ::b::a % b a ::b::a % [artur@localhost xotclIDE]$ /opt/tcl844/bin/tclsh8.4 % package require XOTcl 1.0 % namespace import xotcl::* % Class A ::A % Class B ::B % B create b ::b % A create a ::a % b a b: unable to dispatch method 'a' %

2 2

XOTcl 1.1.0 available
by Gustaf Neumann 13 Dec '03

13 Dec '03

Dear XOTcl community, i am pleased to announce the general availability of xotcl 1.1.1. Changes relative to 1.1.0 are: - Improved portability * for Mac OS X (many thanks to Daniel Steffen) * freebsd 4.9 (many thanks to Marc Spitzer) - configure can run outside of xotcl-tree and can install to a different directory. Example: % mkdir -p /tmp/xotcl/unix % cd /tmp/xotcl/unix % ~/xotcl-1.1.1/unix/configure --with-all % make % make test % make install DESTDIR=/tmp - several fixes and improvements such as * added option --with-tkinclude for configure (only needed, when built with optional --with-xowish) * made gdbm work when compiled with threads enabled * fix for initialization of stubtables in gdbm * fixes for HTTP support (return format of values in HTTP OPTION command made windows explorer hang) * easy provision for redirects in HTTP server best regards -gustaf neumann -- Univ.Prof. Dr.Gustaf Neumann Abteilung für Wirtschaftsinformatik WU-Wien, Augasse 2-6, 1090 Wien

1 0

Re: [Xotcl] cant locate package xotcl freewrap visualTcl
by jim 11 Dec '03

11 Dec '03

jim wrote: >i still wonder if there is a way to wrap some xotcl files into the exe >so i dont have to rely on having the whole xotcl install on the users >machine . since i am using just the very basic >features of xotcl right now it seems that i wouldnt need all of those >files. > >i have some documentation now with freewrap that explains this process >i'm wondering about and i might be able to get it to work but dont know >what xotcl files need to get wrapped. > > Hi, While I cant speak for freewrap, (its been years..), I think that the whole point of "wrapping" is to avoid relying on having xotcl installed on the users machine. Maybe I am missing something... But anyway, I can speak for tclkit and starkits, maybe you could grab the XotclIde starkit/pack and "unwrap it" and see whats is going on.. For sure, as a minimum, you would need to include the the xotcl dll, ~ 120Kbytes. If you are using some of the xotcl library procs, eg comm, then you would add those as well... Let me know if you some quick instructions on getting starkits up and running... regards, nicolas boretos Hi Nicolas- thanks for the tip. it seems to be working. I deleted the xotcl directories off my system to test it. I have one directory set up called c:/elevatorApp that contains 3 files... pkgIndex.tcl libxotcl1.1.dll and elevator6.tcl .... and of course the elevator6.exe file. seems to be all the files I need. now after I error trap I can distribute my first small gui xotcl/tcl app on my website. thanks, marvin

1 0

re: [Xotcl] cant locate package xotcl freewrap visualTcl
by jim 11 Dec '03

11 Dec '03

i still wonder if there is a way to wrap some xotcl files into the exe so i dont have to rely on having the whole xotcl install on the users machine . since i am using just the very basic features of xotcl right now it seems that i wouldnt need all of those files. i have some documentation now with freewrap that explains this process i'm wondering about and i might be able to get it to work but dont know what xotcl files need to get wrapped. if you might know which files i'm after to wrap into the exe, please let me know. i can live with having the freewrap on the users machine so if it is lots of explaining and you dont think others would benefit from an explanation that is ok too. i'm lucky i got as far as i did. thanks, marvin

2 1

re: [Xotcl] cant locate package xotcl freewrap visualTcl
by jim 11 Dec '03

11 Dec '03

hi- i fixed it so i can run my exe file from the desktop for my tcl script created in visual tcl that uses xotcl code. here are the steps to do this: after the tcl project file is saved in tcl open it in notepad. you will see this line of code that starts... at the top of the project tcl file if {![info exists vTcl(sourcing)]} { #add this code below this comment lappend auto_path "C:/Program Files/Tcl/lib/xotcl1.1/xotcl" if you are using notepad choose file save as and put quotes around the project tcl file. choose file type all files from the drop down in the save as window. # as always before overwriting make sure you have a backup file. save and overwrite. now you have to manually freewrap the file. copy your project file to c:\program files\vTcl\freewrap\windows\bin directory. this way the project file is now in the same directory as the freewrap.exe file. choose start run and type this... "C:\Program Files\vTcl\freewrap\windows\bin\freewrap.exe" elevator5.tcl substitute the name of your project tcl file instead of elevator5.tcl click ok an exe file should now be created called something like elevator5.exe. now you can create a shortcut to the desktop if you like. hope this helps. thanks, marvin

1 0

re: [Xotcl] cant locate package xotcl freewrap visualTcl
by jim 10 Dec '03

10 Dec '03

Hi- I went into a console and typed puts $auto_path; when i load and run my project tcl file from inside the visual tcl environment it works fine. it bombs out when i try to use the binary. i'm including the auto_path printout for you to view for completeness. C:/program files/Tcl/lib/xotcl1.1/xotcl {C:/Program Files/Tcl/lib/tcl8.4} {C:/Program Files/Tcl/lib} {C:/Program Files/Tcl/lib/tcllib1.5} {C:/Program Files/Tcl/lib/tk8.4} {C:/Program Files/Tcl/lib/itk3.2} {C:/Program Files/Tcl/lib/iwidgets4.0.2} {C:/Program Files/Tcl/lib/iwidgets4.0.2/generic} {C:/Program Files/Tcl/lib/iwidgets4.0.2/scripts} thanks, marvin

1 0

cant locate package xotcl freewrap visualTcl
by jim 10 Dec '03

10 Dec '03

hi- in my script at the beginning i added a line like this global widget lappend auto_path /Program Files/Tcl/lib/xotcl1.1/xotcl/ ; package require XOTcl; namespace import -force xotcl::* etc. etc. etc. <rest of script(s)> i thought this was the way to do it but i guess not. is putting lappend auto_path ... going to fill up the auto_path contents with a redundant path values making it huge? the widgets in visualTcl i use i believe are in libraries. how come they are wrapped in the binary exe file and xotcl is not? if it is required that i have xotcl installed on the computer i am distributing to i guess that is ok. is there a way to make it so with the programs i mentioned all i have to do is distribute the exe file? i finished my program i was working on that simulates a fake elevator. i used some xotcl code the mailing list helped me with and integrated it into a visualTcl GUI program with events. I wanted to put a download link on my website to show people. I was hoping they could just download the exe from the link but if not it is not that important. thanks, marvin

1 0

Re: [Xotcl] constructor initialization problem
by jim 09 Dec '03

09 Dec '03

>>Hi marvin, >>in order to get an instance variable into the scope of an instproc, you have to import it via the method instvar thanks Gustaf! I think I'll try another program out and learn some more. I have 3 more of these easier funny object oriented programs we were given in intro to C++ class. I am new to both tcl/tk and xotcl so it should be a challenge translating them. later marvin

1 0

constructor initialization problem
by j_marvin＠localnet.com 09 Dec '03

09 Dec '03

Hi- In the simple code below I'm working on to simulate an elevator I am having a little trouble with the constructor initializing. I get an error that says "cant read currentFloor...no such variable." I thought I had set up the constructor right. I tried following this format from the manual --- Room instproc setCeilingColor color { my set ceilingColor $color } Room instproc init args { my setCeilingColor white next } Here is the code. It bombs out in the body of the method named request when it tries to read the first $currentFloor variable. I hope I am getting the idea and it is something kind of simple I am missing. Please offer a suggestion if what I am doing wrong is apparent to you. thank you, marvin package require XOTcl; namespace import -force xotcl::* Class Elevator Elevator instproc setInitFloor floor { my set currentFloor $floor ; } Elevator instproc init args { my set setInitFloor 1; next; } Elevator instproc getFloor args { puts $currentFloor; } Elevator instproc request requestFloor { my set request $requestFloor; while {$requestFloor > 0} { if {$currentFloor < $requestFloor} { set currentFloor [[Ride getFloor] + 1]; puts "going up...current floor is $currentFloor"; } if {$currentFloor > $requestFloor} { set currentFloor [[Ride getFloor] - 1]; } if {$currentFloor == $requestFloor} { set requestFloor 0; } } puts "current floor is $currentFloor"; } set requestFloor 4; Elevator Ride; Ride request $requestFloor; Ride destroy ;

2 1

2025

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

2002

2001

2000

Xotcl December 2003