Roxen.git / server / etc / test / tests / http / ping.pike

version» Context lines:

Roxen.git/server/etc/test/tests/http/ping.pike:1: + inherit "http_common";    -  + void main(int argc, array argv) + { +  if( argc < 4 ) exit( BADARG ); +  +  Stdio.File f = connect( argv[1] ); +  +  f->write( "PING" + (argc==5?"\n":"\r\n") ); +  +  string data = f->read(); +  +  if( data != "PONG\r\n" ) +  exit( BADDATA ); +  +  exit( OK ); + }   Newline at end of file added.