Xotcl December 2000

xotcl@alice.wu.ac.at

8 participants
18 discussions

Object mixin with passing init args ?
by Zoran Vasiljevic 13 Dec '00

13 Dec '00

Hi XOTcl gurus! Consider this: % Class Foo % Foo instproc init {dir} {puts hallo} % Class Bar % Bar bar % bar mixin Foo no value given for parameter "dir" to "init" After snooping arround I've found out that mixin's does not allow any argument passing to the mixin class initializer. Is this something normal ? If one needs such functionality are there any workarounds ? Cheer's Zoran ______________________________________________ FREE Personalized Email at Mail.com Sign up at http://www.mail.com/?sr=signup

2 1

Thanks!
by Laurent Duperval 11 Dec '00

11 Dec '00

Hi, Thanks for all the answers to my questions. I'll read and digest them and take it from there. L -- MY EMAIL ADDRESS HAS CHANGED --> UPDATE YOUR ADDRESSBOOK Laurent Duperval "Montreal winters are an intelligence test, Netergy Networks - Java Center and we who are here have failed it." Phone: (514) 282-8484 ext. 228 -Doug Camilli mailto:laurent.duperval@netergynet.com Penguin Power!

1 0

Packaging question
by Laurent Duperval 11 Dec '00

11 Dec '00

Hi, What is the equivalent of building a tclIndex file for xotcl classes? I want to build an app which is comprised of a whole bunch of modules. I'd like the modules to be automatically loaded when I call one of the classes defined in them. The way I do it now is: source "module1.tcl" source "module2.tcl" . . . There is most likely a better way but I'm not sure what it is. Thanks, L -- MY EMAIL ADDRESS HAS CHANGED --> UPDATE YOUR ADDRESSBOOK Laurent Duperval "Montreal winters are an intelligence test, Netergy Networks - Java Center and we who are here have failed it." Phone: (514) 282-8484 ext. 228 -Doug Camilli mailto:laurent.duperval@netergynet.com Penguin Power!

2 1

Abstract class question
by Laurent Duperval 11 Dec '00

11 Dec '00

Hi, How do you enforce abstract methods? For example: Class Foo Foo abstract instproc procdef args Class Bar -superclass Bar instproc proc2 Bar barObj I would like an error to be thrown at the "Bar barObj" line because the Bar object doesn't define the procdef instproc. Is this rule enforceable? Is my only way at it to use assertions? Thanks, L -- MY EMAIL ADDRESS HAS CHANGED --> UPDATE YOUR ADDRESSBOOK Laurent Duperval "Montreal winters are an intelligence test, Netergy Networks - Java Center and we who are here have failed it." Phone: (514) 282-8484 ext. 228 -Doug Camilli mailto:laurent.duperval@netergynet.com Penguin Power!

2 1

More usage questions
by Laurent Duperval 11 Dec '00

11 Dec '00

Hi, How do I do aggregation of objects? For example, in Java I have class Foo { Class1 c1; Class2 c2; } where Class1 and Class2 are two other classes. How do I create the same effect in XOTcl? I've tried a few variations but I don't get the effect I want so I guess I'm doing wrong. Also, how do you create and use private data? By this I mean data (and possibly methods) which are only accessible by the class or the object. Thanks, L -- MY EMAIL ADDRESS HAS CHANGED --> UPDATE YOUR ADDRESSBOOK Laurent Duperval "Montreal winters are an intelligence test, Netergy Networks - Java Center and we who are here have failed it." Phone: (514) 282-8484 ext. 228 -Doug Camilli mailto:laurent.duperval@netergynet.com Penguin Power!

2 1

abstract methods again
by Laurent Duperval 11 Dec '00

11 Dec '00

Hi, TO follow up on my previous message, I'd like the following not tothrow an error: Class Abstract abstract instproc foo args Class NotAbstract -superclass Abstract NotAbstract instproc foo {arg1 arg2} {} NotAbstract obj . . . L -- MY EMAIL ADDRESS HAS CHANGED --> UPDATE YOUR ADDRESSBOOK Laurent Duperval "Montreal winters are an intelligence test, Netergy Networks - Java Center and we who are here have failed it." Phone: (514) 282-8484 ext. 228 -Doug Camilli mailto:laurent.duperval@netergynet.com Penguin Power!

1 0

Re: XOTcl 0.83 questions (continued...)
by Zoran Vasiljevic 08 Dec '00

08 Dec '00

------Original Message------ From: <uwe.zdun(a)uni-essen.de> To: Zoran Vasiljevic <zoran(a)munich.com> Sent: December 8, 2000 11:57:35 AM GMT Subject: Re: XOTcl 0.83 questions (continued...) >I'll hope to extend & test it ASAP to support more >functionalities, >but today I will not make it. Therefore, I send what I have so >far. You are very kind Uwe! Thanks for help and for the time you took!! I will use this as a start point, but would nevertheless like to see what you'll make out of it later, whenever that is. Please send my your changes whenever you are ready. Now, let's see if I can do something on my own... I've read about XOTcl enough. Now is time to put it in practice. Cheer's Zoran ______________________________________________ FREE Personalized Email at Mail.com Sign up at http://www.mail.com/?sr=signup

1 0

Re: XOTcl 0.83 questions (continued...)
by Zoran Vasiljevic 08 Dec '00

08 Dec '00

------Original Message------ From: <uwe.zdun(a)uni-essen.de> To: Zoran Vasiljevic <zoran(a)munich.com> Sent: November 21, 2000 1:36:57 PM GMT Subject: Re: XOTcl 0.83 questions (continued...) >here, is some example code that shows two ways how to retrieve >all instances, classes, and metaclasses in the system: Hi ! Thanks for this good example. But I still somehow have problems. The main problem is the ORDER! What I need to do is run a script against an initialized interpreter and construct another script which will replicate all XOTcl objects, classes etc,etc in an fresh interpreter. So the *ORDER* of commands is crucial. If somebody says: Class Foo Class Bar -superclass Foo Then the introspection script !!!MUST NOT!! emit: Class Bar -superclass Foo Class Foo The example below seems not to care about the order. The "allObjs" list below has all objects, right, but the order is not preserved, or not correctly computed. So I would *realy* appreciate if somebody could point me to the right direction. I apologize If I'm being to ignorant or stupid. Maybe this is just another piece of cake for XOTcl experts but for me (as XOTcl beginner) it's not! Thanks, Zoran Vasiljevic -------------- ################################################################### # set up some classes for testing # # some meta classes # Class Meta -superclass Class Class Meta2 -superclass Meta Class Meta3 -superclass Meta2 # # some classes # Class X Class Y Meta Z Meta2 A Meta2 B # # some objs # X x Object o Y y1 Y y1 A a1 A a2 # # if you only use the global namespace it is quite simple to retrieve # the instances, like: # (you can also traverse the namespaces ... but then the # variant down below is more elegant) set objects "" foreach c [info commands] { if {[Object isobject $c]} {lappend objects $c} } puts "Global Objects are: $objects" # # we can also go along the class hierarchy # # we define a separate class that computes the instances (could # also be instprocs on Object ... but then we won't have the ability # to use the code on a subclass) # Class InstanceRetrieval InstanceRetrieval instproc getAllSubClasses cl { set result "" set sc [$cl info subclass] foreach c $sc { lappend result $c set result [concat $result [[self] getAllSubClasses $c]] } return $result } InstanceRetrieval instproc getAllInstances {} { set result "" # get all subclasses of this class set subclasses [[self] getAllSubClasses [self]] # now get the instances of every subclass foreach sc $subclasses { set result [concat $result [$sc info instances]] } return $result } # now we register that class on Object as a mixin # -> we can all instances of the object class (including the # nested objects Object mixinappend InstanceRetrieval set allObjs [Object getAllInstances] puts "All objects are: $allObjs" # # with isclass and ismetaclass we can additionally sort out the # classes and metaclasses # foreach o $allObjs { if {[Object isclass $o]} { lappend classes $o if {[Object ismetaclass $o]} {lappend metaclasses $o} } } puts "All classes are: $classes" puts "All metaclasses are: $metaclasses" ################################################################### ______________________________________________ FREE Personalized Email at Mail.com Sign up at http://www.mail.com/?sr=signup

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 2000