Updated 2014-04-30 20:52:53 by Jorge

What is OSCON, and how does it relate to Tcl?

OSCON stands for Open Source Conference [1], and they are hosted by the well-known publisher O'Reilly & Associates.

In the year 2001, OSCON sported a Tcl track. This was dubbed the Eighth Annual Tcl/Tk Conference and held on July 23-27 in San Diego, California. See http://conferences.oreilly.com/archive.html (or ftp://ftp.oreilly.com/pub/conference/os2001/ ) for pointers to presentations and papers presented at this conference.

Before OSCON / O'Reilly, Tcl conferences were held by Usenix, and the last one under its aegide was the Seventh Annual Tcl/Tk Conference held on Feb 14-18 2000 in Austin, Texas.

Now, in 2002, the Tcl community is going its own way again, with a conference sponsered by ActiveState (see the Ninth Annual Tcl/Tk Conference), to be held on September 16-20 2002 in Vancouver, Canada.

I seem to recall there was a Tcl track in 2000 as well - just not well attended.

AK My recollection is that it was too near in time to the regular conference in Austin, so less people went.

JM 30 Apr 2014 - The demo "oscon" under /Tcl/demos/Tcllib/oreilly-oscon2001 requires the following fixes due to the 2.0 changes on Tcllib's struct tree library:

  • somehow the command was written as ::struct::tree::tree t
  • delete the flag -key from the "t get..." commands
 #change #0
 ::struct::tree t
 #change #1
 set day  [escape [t get $day data]]
 #change #2
 set start [cvtdate [escape [t get [walkf $sess {0 0}] data]]]
 #change #3
 set track [string trim [escape [t get [walkf $sess {1 0}] data]]]
 #change #4
 set loc   [escape [t get [walkf $sess {1 1 0}] data]]
 #change #5
 set time    [escape [t get $talk data]]
 #change #6
 set title   [escape [t get [walkf $talk {0 0 0}] data]]
 #change #7
 set speaker [escape [t get [walkf $talk {0 2}] data]]
 #change #8
 set  tp  [$t get $n type]
 #change #9
 log::log debug "[textutil::strRepeat " " $d]$idx $tp ([$t get $n data]...)"
 #change #10
 log::log debug "[textutil::strRepeat " " $d]$idx $tp ([string range [$t get $n data] 0 20]...)"