pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1:   /* -*- Pike -*-    * -  * $Id: master.pike.in,v 1.79 1999/12/05 21:27:44 grubba Exp $ +  * $Id: master.pike.in,v 1.80 1999/12/06 21:59:37 grubba Exp $    *    * Master-file for Pike.    *    * Based on master.pike 1.67.    */      // Some configurable parameters useful for debugging      #define PIKE_AUTORELOAD      // Used by describe_backtrace() et al.   #if !defined(BT_MAX_STRING_LEN) || (BT_MAX_STRING_LEN <= 0)   #undef BT_MAX_STRING_LEN   #define BT_MAX_STRING_LEN 200   #endif /* !defined(BT_MAX_STRING_LEN) || (BT_MAX_STRING_LEN <= 0) */    -  + constant bt_max_string_len = BT_MAX_STRING_LEN; +    /*    * Functions begin here.    */      int is_absolute_path(string p)   {   #ifdef __NT__    p=replace(p,"\\","/");    if(sscanf(p,"%[a-zA-Z]:",string s) && sizeof(s)==1)    return 1;
pike.git/lib/master.pike.in:1409:   }      /* It is possible that this should be a real efun,    * it is currently used by handle_error to convert a backtrace to a    * readable message.    */   string describe_backtrace(mixed trace, void|int linewidth)   {    int e;    string ret; -  int backtrace_len=((int)getenv("PIKE_BACKTRACE_LEN")) || BT_MAX_STRING_LEN; +  int backtrace_len=((int)getenv("PIKE_BACKTRACE_LEN")) || bt_max_string_len;          if(!linewidth)    {    linewidth=99999;    catch    {    linewidth=_static_modules.files()->_stdin->tcgetattr()->columns;    };    }