Xotcl March 2005

xotcl@alice.wu.ac.at

6 participants
6 discussions

serialize usage
by Aamer Akhter 05 Apr '05

05 Apr '05

Hello, I seem to be missing something basic in the usage of Serializer: package require XOTcl namespace import ::xotcl::* package require xotcl::serializer set a [Object new] $a set b hello Serializer deepSerialize $a the last command doesn't seem to return anything. I had expected the creation and config code for $a. What am I missing? -- Aamer Akhter / aakhter(a)gmail.com

3 5

google webservice interface in xotcl
by Gustaf Neumann 23 Mar '05

23 Mar '05

Dear XOTcl Community, some of you might have a use of the simple Google query API in XOTcl. enjoy. -gustaf ################################################### # Simple Google query interface in XOTcl # This script submits a SOAP query to the Google # web service query interface # # -gustaf neumann, Jan. 2005 ################################################### package req XOTcl; namespace import -force ::xotcl::* package req tdom set LICENSE_KEY <****INSERT_YOUR_LICENCE_KEY_HERE*****> Class GoogleQuery -parameter { {key $::LICENSE_KEY} {q "shrdlu winograd maclisp teletype"} {start 0} {maxResults 10} {restrict ""} {safeSearch false} {lr ""} {ie "latin1"} {oe "latin1"} } -set template \ {<?xml version='1.0' encoding='UTF-8'?> <SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsi="http://www.w3.org/1999/XMLSchema-instance" xmlns:xsd="http://www.w3.org/1999/XMLSchema"> <SOAP-ENV:Body> <ns1:doGoogleSearch xmlns:ns1="urn:GoogleSearch" SOAP-ENV:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"> <key xsi:type="xsd:string">[my key]</key> <q xsi:type="xsd:string">[my q]</q> <start xsi:type="xsd:int">[my start]</start> <maxResults xsi:type="xsd:int">[my maxResults]</maxResults> <filter xsi:type="xsd:boolean">true</filter> <restrict xsi:type="xsd:string">[my restrict]</restrict> <safeSearch xsi:type="xsd:boolean">[my safeSearch]</safeSearch> <lr xsi:type="xsd:string"[my lr]></lr> <ie xsi:type="xsd:string">[my ie]</ie> <oe xsi:type="xsd:string">[my oe]</oe> </ns1:doGoogleSearch> </SOAP-ENV:Body> </SOAP-ENV:Envelope>} GoogleQuery instproc query {} { set SOAPmsg [subst [[self class] set template]] set S [socket api.google.com 80] puts $S "POST /search/beta2 HTTP/1.0" puts $S "Host: api.google.com" puts $S "Content-Length: [string length $SOAPmsg]" puts $S "Content-Type: text/xml" puts $S "" fconfigure $S -translation binary puts -nonewline $S $SOAPmsg flush $S set result [read $S] close $S set F [open OUT w]; puts $F $result; close $F return [string range $result \ [expr {[string first \r\n\r\n $result]+4}] end] } GoogleQuery instproc init {} { set result [my query] set doc [dom parse $result] set root [$doc documentElement] puts "[llength [$root selectNodes //snippet]] snippets found" foreach item [$root selectNodes //resultElements/item] { Answer new -childof [self] \ -URL [[$item selectNodes URL] text] \ -title [[$item selectNodes title] text] \ -chachedSize [[$item selectNodes cachedSize] text] \ -snippet [[$item selectNodes snippet] text] } } Class Answer -parameter {URL title chachedSize snippet} set G [GoogleQuery new -q xotcl] foreach a [$G info children] { foreach e {URL title chachedSize snippet} {puts "$e: [$a $e]"} puts "" }

1 0

XOTcl 1.3.6 available
by Gustaf Neumann 17 Mar '05

17 Mar '05

Dear XOTcl community, I am proud to announce XOTcl 1.3.6. Major changes relative to 1.3.5 are: * Improved Functionality + new info subcommand: <object> info precedence + simplified meta class definitions: every class can be changed into a metaclass by adding an instmixin of Class (or one of its subclasses) to it. In order to define that every class should be a metaclass, one can use now Object instmixin Class instead of the rather complicated solution i posted on the xotcl mailing list not long ago. * Improved code quality: + fixed possible crashes when - objects are called with class methods (e.g. due to instmixins) - when instmixins are defined recursively (e.g. Class instmixin Class) - objects are turned into classes by changing the class relationship + improved namespace resolution when mixin classes are defined in namespaces (::xotcl:: namespace is skipped, since a helper method that calles the primitive setting command is defined there) + fixed passing of error code from init methods (thanks to Fabrice Pardo for noting it) + returning PACKAGE_VERSION after a package require (e.g. 'package req XOTcl' returns now 1.3.6) + some code refactoring, fixed erroneous documentation of c code + improved documentation More details can be found in the changelog on www.xotcl.org. best regards -gustaf neumann

1 0

incorrect example for non positional arguments
by John McGlaughlin 08 Mar '05

08 Mar '05

The following examples in tutorial cause errors Object o o proc y {-a {-b {1 2 3}} x y} { puts "$a $b $x $y" } Class P P instproc y {-a:required {-b:boolean true}} { puts "$a $b" } Thanks to Ben Thomasson for correcting this for me the code should be ALSO notice that one example is incorrect for -b passing a string 4 5 needs to be bound {4 5} (tcl) 165 % o proc y {-a {-b {1 2 3}}} { x y } { puts "$a $b $x $y" } (tcl) 166 % o y -b 4 5 -a 1 3 4 wrong # args: should be { x y } (tcl) 167 % o y -b {4 5} -a 1 3 4 1 4 5 3 4 (tcl) 168 % o y -a 1 3 4 1 1 2 3 3 4 (tcl) 169 % o y -a 1 -- -b -c 1 1 2 3 -b -c (tcl) 170 % (tcl) 174 % P instproc y {-a:required {-b:boolean true}} {} { puts "$a $b" } (tcl) 175 % P p ::xotcl::p (tcl) 176 % p y -a 1 -b 0 1 0

2 1

Small typo on webpage
by Kristoffer Lawson 07 Mar '05

07 Mar '05

It says the latest release was from January 2004. I imagine it means 2005 ;-) / http://www.fishpool.com/~setok/

1 0

Windows Binary
by Murr Florian 03 Mar '05

03 Mar '05

High, is there a reason why the Windows Binary is only xotcl-1.3.4, but Linux has xotcl-1.3.5 ? Cf. http://media.wu-wien.ac.at/download.html#source <http://media.wu-wien.ac.at/download.html#source> regards, - Florian Murr

1 0

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 March 2005