pike.git / bin / test_pike.pike

version» Context lines:

pike.git/bin/test_pike.pike:1:   #!/usr/local/bin/pike    - /* $Id: test_pike.pike,v 1.8 1998/04/06 03:19:37 hubbe Exp $ */ + /* $Id: test_pike.pike,v 1.9 1998/04/08 22:05:36 hubbe Exp $ */      #include <simulate.h>      #if !efun(_verify_internals)   #define _verify_internals()   #endif      int foo(string opt)   {    if(opt=="" || !opt) return 1;
pike.git/bin/test_pike.pike:157:    switch(type)    {    case "FALSE":    a=!a;       case "TRUE":    if(!a)    {    werror("Test "+(e+1)+" failed.\n");    werror(test+"\n"); +  werror(sprintf("o->a(): %O\n",a));    errors++;    }else{    successes++;    }    break;       case "RUN":    successes++;    break;