/* $Log */ /* ************************************************************ second: return elapsed CPU-time Include the same routine under different names (upper-lower case; with-without underscore) to make this routine general for the various machine types ************************************************************ */ #include #include #include second(cptime) float *cptime; { struct tms buffer; int utime, stime; times(&buffer); utime = buffer.tms_utime; stime = buffer.tms_stime; *cptime = utime*1.0/HZ; } second_(cptime) float *cptime; { struct tms buffer; int utime, stime; times(&buffer); utime = buffer.tms_utime; stime = buffer.tms_stime; *cptime = utime*1.0/HZ; } SECOND(cptime) float *cptime; { struct tms buffer; int utime, stime; times(&buffer); utime = buffer.tms_utime; stime = buffer.tms_stime; *cptime = utime*1.0/HZ; } SECOND_(cptime) float *cptime; { struct tms buffer; int utime, stime; times(&buffer); utime = buffer.tms_utime; stime = buffer.tms_stime; *cptime = utime*1.0/HZ; }