View · Search · Index
No registered users in community xowiki
in last 10 minutes

Re: [Xotcl] Send NULL arg to Class constructor

From: <iifat_at_mail.ru>
Date: Tue, 12 May 2009 09:32:15 +1100 (VLAST)

> Object instproc F args {
> puts "CALL [self] [self calledclass]->[self calledproc] $args"
> set r [next]
> puts "EXIT [self] [self calledclass]->[self calledproc] ($r)"
> return $r
> }

Better, imho

Object instproc F args {
  puts "CALL [self] [self calledclass]->[self calledproc] $args"
  catch next r o
  puts "EXIT [self] [self calledclass]->[self calledproc] ($r)"
  return -options $o $r
}