{Explorer.object
  add(statistics
      proc {$ I R}
         F={New Open.file
            init(name:'ours.txt'
                 flags:[write text append]
                 mode:mode(owner:[read write] group:[read write]))}
         Ch = R.c       % select number of choice nodes
         Fa = R.f       % select number of failed nodes
         Su = R.s       % select number of solved nodes
         De = R.depth   % select depth of current subtree
      in
         {F write(vs:'\n'#Ch#'\t\t'#Fa#'\t\t'#Su#'\t\t'#De#'\n')}
         {F close}
      end
      label: 'WRITE')}
 
Raphael thanks to suggest this code to me.  It's left so much to learn!!!
 
The truth this form behaves enough good, nevertheless when I want that the statistical data keep in the file, I must be positioned in a node and always execute the statistical option (in this case WRITE), exists a form in which the file is generated without I to have to
position to me in a node, that is to say, to select the node of some form (internally) and automatically to keep the information?



LLama Gratis a cualquier PC del Mundo.
Llamadas a fijos y móviles desde 1 céntimo por minuto.
http://es.voice.yahoo.com
_________________________________________________________________________________
mozart-users mailing list                               
[email protected]
http://www.mozart-oz.org/mailman/listinfo/mozart-users

Reply via email to