if (p->state == GMON_PROF_ERROR) return;
__moncontrol (mode)     int mode;{  struct gmonparam *p = &_gmonparam;  if (mode)    {      /* start */      __profil((void *) p->kcount, p->kcountsize, p->lowpc, s_scale);      p->state = GMON_PROF_ON;    }  else    {      /* stop */      __profil(NULL, 0, 0, 0);      p->state = GMON_PROF_OFF;    }}