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.41 2000/03/29 04:52:50 hubbe Exp $ */ + /* $Id: test_pike.pike,v 1.42 2000/03/30 21:11:31 grubba Exp $ */      import Stdio;      #if !constant(_verify_internals)   #define _verify_internals()   #endif      #if !constant(_dmalloc_set_name)   void _dmalloc_set_name(mixed ... args) {}   #endif
pike.git/bin/test_pike.pike:425:    if(check > 1) _verify_internals();       shift++;    string fname = argv[f] + ": Test " + (e + 1) +    " (shift " + (shift%3) + ")";       string widener = ([ 0:"",    1:"\nint \x30c6\x30b9\x30c8=0;\n",    2:"\nint \x10001=0;\n" ])[shift%3];    -  widener += "#pragma strict_types\n"; +  // widener += "#pragma strict_types\n";       if(test[-1]!='\n') test+="\n";       int computed_line=sizeof(test/"\n");    array gnapp= test/"#";    for(int e=0;e<sizeof(gnapp);e++)    {    if(sscanf(gnapp[e],"%*d"))    {    computed_line=0;