Roxen.git/ server/ base_server/ roxen.pike

1999-04-24

1999-04-24 19:11:50 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• 60009621dd3f677cd378c6481769a42bfdf575a5 (17 lines) (+11/-6) ^{[ Show | Annotate ]}
  Branch: 5.2

Fixed some debug code.

Rev: server/base_server/roxen.pike:1.268

1:   /* -  * $Id: roxen.pike,v 1.267 1999/04/22 14:17:40 per Exp $ +  * $Id: roxen.pike,v 1.268 1999/04/24 19:11:50 grubba Exp $    *    * The Roxen Challenger main program.    *
7:    */      // ABS and suicide systems contributed freely by Francesco Chemolli - constant cvs_version="$Id: roxen.pike,v 1.267 1999/04/22 14:17:40 per Exp $"; + constant cvs_version="$Id: roxen.pike,v 1.268 1999/04/24 19:11:50 grubba Exp $";      object backend_thread;   
622:    * THREADS code starts here    */   #ifdef THREADS - #define THREAD_DEBUG + // #define THREAD_DEBUG      object do_thread_create(string id, function f, mixed ... args)   {
646:    {    if(q=catch {    do { + #ifdef THREAD_DEBUG    werror("Handle thread ["+id+"] waiting for next event\n"); -  + #endif /* THREAD_DEBUG */    if((h=handle_queue->read()) && h[0]) { -  + #ifdef THREAD_DEBUG    werror(sprintf("Handle thread [%O] calling %O(@%O)...\n", -  h[0], h[1..])); +  id, h[0], h[1..])); + #endif /* THREAD_DEBUG */    SET_LOCALE(default_locale);    h[0](@h[1]);    h=0;
661:    }    } while(1);    }) { -  report_error(LOCALE->uncaught_error(describe_backtrace(q))); +  report_error(/* LOCALE->uncaught_error(*/describe_backtrace(q)/*)*/);    if (q = catch {h = 0;}) {    report_error(LOCALE->    uncaught_error(describe_backtrace(q)));
3109:    best=best*100/strlen(host);   #endif /* !String.fuzzymatch && Array.diff_longest_sequence */    -  if(best >= QUERY(minmatch)) +  if(best >= 50 /* QUERY(minmatch) */)    id->conf = config_cache[host] = (c || id->conf);    else    config_cache[host] = id->conf;