source: trunk/third/gmp/tune/hppa2w.asm @ 18191

Revision 18191, 1.4 KB checked in by ghudson, 22 years ago (diff)
This commit was generated by cvs2svn to compensate for changes in r18190, which included commits to RCS files with non-trunk default branches.
Line 
1dnl  HPPA 64-bit time stamp counter access routine.
2
3dnl  Copyright 2000 Free Software Foundation, Inc.
4dnl
5dnl  This file is part of the GNU MP Library.
6dnl
7dnl  The GNU MP Library is free software; you can redistribute it and/or
8dnl  modify it under the terms of the GNU Lesser General Public License as
9dnl  published by the Free Software Foundation; either version 2.1 of the
10dnl  License, or (at your option) any later version.
11dnl
12dnl  The GNU MP Library is distributed in the hope that it will be useful,
13dnl  but WITHOUT ANY WARRANTY; without even the implied warranty of
14dnl  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15dnl  Lesser General Public License for more details.
16dnl
17dnl  You should have received a copy of the GNU Lesser General Public
18dnl  License along with the GNU MP Library; see the file COPYING.LIB.  If
19dnl  not, write to the Free Software Foundation, Inc., 59 Temple Place -
20dnl  Suite 330, Boston, MA 02111-1307, USA.
21
22dnl Don't include this, it's not ready for hppa
23dnl include(`../config.m4')
24
25dnl void speed_cyclecounter (unsigned p[2]);
26dnl
27dnl Get the HPPA interval timer.
28
29        .level 2.0w
30        .code
31        .export speed_cyclecounter,entry
32speed_cyclecounter
33        .proc
34        .callinfo       frame=0,args_saved
35        .entry
36
37        mfctl   %cr16,%r28
38        stw     %r28,0(0,%r26)          ; low word
39        extrd,u %r28,31,32,%r28
40        bv      0(%r2)
41        .exit
42        stw     %r28,4(0,%r26)          ; high word
43        .procend
Note: See TracBrowser for help on using the repository browser.