home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
World of A1200
/
World_Of_A1200.iso
/
programs
/
system
/
cpuclear
/
source.lha
/
sources
/
SpeedTest.c
< prev
Wrap
C/C++ Source or Header
|
1992-10-15
|
967b
|
41 lines
/*
test for cpuclr - written by Oliver Wagner
*/
#include <stdio.h>
#include <time.h>
#include <proto/exec.h>
#include <proto/graphics.h>
short __chip test[8194];
struct GfxBase *GfxBase;
void main()
{
long t1,t2;
int c=0;
GfxBase=OldOpenLibrary("graphics.library");
printf("Starting 5000 BltClears()s...\n");
test[8191]=-1;
test[8192]=-1;
test[8193]=-1;
Forbid();
time(&t1);
for(;c<1000;c++) {
BltClear(test,6,1);
BltClear(test,4096,1);
BltClear(test,128,1);
BltClear(test,16384,5 + (0xaaaa<<16));
BltClear(test,64 + (256<<16),3);
}
time(&t2);
Permit();
printf("needed %ld secs\n",t2-t1);
if(test[8191]) printf("8192 hit with %lx\n",(long)test[8191]);
if(test[8192]!=-1) printf("8193 hit\n");
if(test[8193]!=-1) printf("8194 hit\n");
}