/* -*- LPC -*- */ /* * $Locker: $ * $Id: usage.c,v 1.1 1998/01/06 05:25:41 ceres Exp $ * $Log: usage.c,v $ * Revision 1.1 1998/01/06 05:25:41 ceres * Initial revision * */ mixed cmd(string arg) { mapping info; info = rusage(); printf("Current statistics are:\n"+ "Memory: %d\nMajorfaults: %d\nUser time: %d\nSystem time: %d\n", info["maxrss"], info["majflt"], info["minflt"], info["utime"] / 1000, info["stime"] / 1000); return 1; } void dest_me() { destruct(this_object()); } void clean_up() { dest_me(); } void reset() { dest_me(); }