home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / ixemul-45.0-src.tgz / tar.out / contrib / ixemul / library / profil.c < prev    next >
C/C++ Source or Header  |  1996-10-01  |  1KB  |  43 lines
  1. /*
  2.  *  This file is part of ixemul.library for the Amiga.
  3.  *  Copyright (C) 1991, 1992  Markus M. Wild
  4.  *  Portions Copyright (C) 1994 Rafael W. Luebbert
  5.  *
  6.  *  This library is free software; you can redistribute it and/or
  7.  *  modify it under the terms of the GNU Library General Public
  8.  *  License as published by the Free Software Foundation; either
  9.  *  version 2 of the License, or (at your option) any later version.
  10.  *
  11.  *  This library is distributed in the hope that it will be useful,
  12.  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14.  *  Library General Public License for more details.
  15.  *
  16.  *  You should have received a copy of the GNU Library General Public
  17.  *  License along with this library; if not, write to the Free
  18.  *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  19.  *
  20.  *  $Id: profil.c,v 1.2 1994/06/19 15:14:32 rluebbert Exp $
  21.  *
  22.  *  $Log: profil.c,v $
  23.  *  Revision 1.2  1994/06/19  15:14:32  rluebbert
  24.  *  *** empty log message ***
  25.  *
  26.  *
  27.  */
  28. #define _KERNEL
  29. #include "ixemul.h"
  30.  
  31. int
  32. profil (char *buff, int bufsiz, int offset, int scale)
  33. {
  34.   Disable();    /* prevent ix_timer from accessing these variables */
  35.   u.u_prof.pr_base  = (short *)buff;
  36.   u.u_prof.pr_size  = bufsiz;
  37.   u.u_prof.pr_off   = offset;
  38.   u.u_prof.pr_scale = scale;
  39.   Enable();
  40.   
  41.   return (int)&u.u_prof_last_pc;
  42. }
  43.