Update of /cvsroot/monetdb/sql/src/backends/monet5
In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv17170
Modified Files:
sql.mx
Log Message:
Extented times command
U sql.mx
Index: sql.mx
===================================================================
RCS file: /cvsroot/monetdb/sql/src/backends/monet5/sql.mx,v
retrieving revision 1.293
retrieving revision 1.294
diff -u -d -r1.293 -r1.294
--- sql.mx 3 Nov 2008 15:32:03 -0000 1.293
+++ sql.mx 4 Nov 2008 08:02:23 -0000 1.294
@@ -245,19 +245,29 @@
factory times();
elaps:= alarm.time();
- inblocks := bbp.getDiskReads();
- oublocks := bbp.getDiskWrites();
+ user := profiler.getUserTime();
+ system := profiler.getSystemTime();
+ inblocks := profiler.getDiskReads();
+ oublocks := profiler.getDiskWrites();
barrier goon:=true;
- u1:= alarm.time();
- i1 := bbp.getDiskReads();
- o1 := bbp.getDiskWrites();
- elaps:= u1-elaps;
+ e1:= alarm.time();
+ u1:= profiler.getUserTime();
+ s1:= profiler.getSystemTime();
+ i1 := profiler.getDiskReads();
+ o1 := profiler.getDiskWrites();
+ elaps:= e1-elaps;
inblocks := i1-inblocks;
oublocks := o1-oublocks;
- io.printf("#times %d ms",elaps);
+ user := u1-user;
+ system:= s1-system;
+ io.printf("times %d ms",elaps);
+ io.printf(" user %d ms",user);
+ io.printf(" system %d ms",system);
io.printf(" %d reads",inblocks);
io.printf(" %d writes\n",oublocks);
- elaps := u1;
+ elaps := e1;
+ user := u1;
+ system:=s1;
inblocks := i1;
oublocks := o1;
yield times;
-------------------------------------------------------------------------
This SF.Net email is sponsored by the Moblin Your Move Developer's challenge
Build the coolest Linux based applications with Moblin SDK & win great prizes
Grand prize is a trip for two to an Open Source event anywhere in the world
http://moblin-contest.org/redirect.php?banner_id=100&url=/
_______________________________________________
Monetdb-sql-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-sql-checkins
