double cputime() { return ( 0.000001L * (double)clock() ); } main ( int argc, char**argv ) { #ifdef USENEWRANDOM #ifdef CRAY #define get_my_bdata64 GET_MY_BDATA64 #endif #ifdef __decalpha #define get_my_bdata64 get_my_bdata64_ #endif int one = 1; #endif unsigned int A[11264000]; int nw = 11264000; int negseed = -99907; int myf, myl; /* dummy */ int bufnum, numbufs; double cputime(), timer; timer = cputime(); numbufs = atoi(argv[1]); for ( bufnum = 1; bufnum <= numbufs; bufnum++ ) { #ifdef USENEWRANDOM get_my_bdata64( &bufnum, &one, &one, &nw, &one, &negseed, A, &myf, &myl); #else get_my_bdata64( bufnum, 1, 1, nw, 1, negseed, A, &myf, &myl ); #endif } timer = cputime() - timer; #ifdef USENEWRANDOM printf("%d buffers using newrandom\n", numbufs); #else printf("%d buffers using prandom\n", numbufs); #endif printf ( "CPU = %10.4f seconds\n", timer ); exit(0); }