pike.git / bin / test_pike.pike

version» Context lines:

pike.git/bin/test_pike.pike:1:   #! /usr/bin/env pike    - /* $Id: test_pike.pike,v 1.109 2006/06/16 16:26:41 grubba Exp $ */ + /* $Id: test_pike.pike,v 1.110 2007/06/07 13:51:23 grubba Exp $ */      #if !constant(_verify_internals)   #define _verify_internals()   #endif      #if !constant(_dmalloc_set_name)   void _dmalloc_set_name(mixed ... args) {}   #endif      int foo(string opt)
pike.git/bin/test_pike.pike:404:    Stdio.stdout->dup2(stdout);    //stdout->assign(Stdio.stdout->_fd->dup());    Stdio.stderr->dup2(Stdio.stdout);    stdout->set_close_on_exec(1);      #ifdef WATCHDOG    int watchdog_time=time();       if(use_watchdog && !forked)    { +  object watchdog_tmp;   #ifdef WATCHDOG_PIPE -  object watchdog_tmp=Stdio.File(); -  watchdog_pipe=watchdog_tmp->pipe(Stdio.PROP_IPC); -  watchdog=Process.create_process( -  backtrace()[0][3] + ({ "--watchdog="+getpid() }), -  (["stdin":watchdog_tmp ])); -  destruct(watchdog_tmp); +  watchdog_tmp = Stdio.File(); +  watchdog_pipe = watchdog_tmp->pipe(Stdio.PROP_IPC); +  add_constant("__signal_watchdog",lambda(){});   #endif -  - #ifdef WATCHDOG_SIGNAL +     watchdog=Process.create_process( -  backtrace()[0][3] + ({ "--watchdog="+getpid() }) ); - #endif +  backtrace()[0][3] + ({ "--watchdog="+getpid() }), +  ([ +  "stdin" :watchdog_tmp || Stdio.stdin, +  "stdout":Stdio.stderr, +  "stderr":Stdio.stderr, +  ])); +  if (watchdog_tmp) destruct(watchdog_tmp);    } -  + #endif + #if defined(WATCHDOG_SIGNAL) && defined(WATCHDOG)    add_constant("__signal_watchdog",signal_watchdog); - #else + #else // WATCHDOG_PIPE or !WATCHDOG    add_constant("__signal_watchdog",lambda(){}); - #endif // else WATCHDOG_PIPE + #endif // WATCHDOG_SIGNAL && WATCHDOG       add_constant("_verbose", verbose);    if(verbose)    stdout->write("Begin tests at "+ctime(time()));       testsuites += Getopt.get_args(argv, 1)[1..];    foreach(testsuites; int pos; string ts) {    if(Stdio.is_dir(ts))    testsuites[pos] = ts = combine_path(ts, "testsuite");    if(!file_stat(ts))