+
+/*
+ * Process debugging system call.
+ */
+/* ARGSUSED */
+profil(p, uap, retval)
+ struct proc *p;
+ register struct args {
+ short *bufbase;
+ unsigned bufsize;
+ unsigned pcoffset;
+ unsigned pcscale;
+ } *uap;
+ int *retval;
+{
+ register struct uprof *upp = &p->p_stats->p_prof;
+
+ upp->pr_base = uap->bufbase;
+ upp->pr_size = uap->bufsize;
+ upp->pr_off = uap->pcoffset;
+ upp->pr_scale = uap->pcscale;
+#ifdef PROFTIMER
+ initprofclock();
+#endif
+ return (0);
+}