pike.git/ bin/ test_pike.pike

1999-10-21

1999-10-21 21:19:12 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• 0c7574f1520bb1d1935701da7774f5d5704801d6 (7 lines) (+6/-1) ^{[ Show | Annotate ]}
  Branch: 7.9

Added check-level 4, which calls gc() between every test.

Rev: bin/test_pike.pike:1.28

1:   #!/usr/local/bin/pike    - /* $Id: test_pike.pike,v 1.27 1999/08/30 06:21:17 hubbe Exp $ */ + /* $Id: test_pike.pike,v 1.28 1999/10/21 21:19:12 grubba Exp $ */      import Stdio;   
179:    mixed a,b;       if(check) _verify_internals(); +  if(check>3) { +  gc(); +  _verify_internals(); +  }       test=tests[e];    if(sscanf(test,"COND %s\n%s",condition,test)==2)