[Mailman-Users] Where is "create" source code?

Alex Wu M9115024 at mail.ntust.edu.tw
Mon Jan 6 09:09:02 CET 2003

tcl-object.tcl :

proc new { className args } {
 set o [SplitObject getid]
 if [catch "$className create $o $args" msg] {
  if [string match "__FAILED_SHADOW_OBJECT_" $msg] {
   # The shadow object failed to be allocated.
   delete $o
   return ""
  global errorInfo
  error "class $className: constructor failed: $msg" $errorInfo
 return $o

This is the procedure new in tcl-object.tcl file.
The procedure new calls a create command.
I wanna see the create's source code.
Would you please tell me where the source is?
Thank you.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mail.python.org/pipermail/mailman-users/attachments/20030106/73bf51cd/attachment.htm 

More information about the Mailman-Users mailing list