1/****************************************************************************
2 *******                                                              *******
3 *******            T I M E
4 *******                                                              *******
5 ****************************************************************************
6
7 Author  : Jeremy Rolls
8 Date    :
9
10 *
11 *  (C) 1990 - 2000 Specialix International Ltd., Byfleet, Surrey, UK.
12 *
13
14 *      This program is free software; you can redistribute it and/or modify
15 *      it under the terms of the GNU General Public License as published by
16 *      the Free Software Foundation; either version 2 of the License, or
17 *      (at your option) any later version.
18 *
19 *      This program is distributed in the hope that it will be useful,
20 *      but WITHOUT ANY WARRANTY; without even the implied warranty of
21 *      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22 *      GNU General Public License for more details.
23 *
24 *      You should have received a copy of the GNU General Public License
25 *      along with this program; if not, write to the Free Software
26 *      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
27
28 Version : 0.01
29
30
31                            Mods
32 ----------------------------------------------------------------------------
33  Date     By                Description
34 ----------------------------------------------------------------------------
35
36 ***************************************************************************/
37
38#ifndef _riotime_h
39#define _riotime_h 1
40
41#ifndef lint
42#ifdef SCCS
43static char *_rio_riotime_h_sccs = "@(#)riotime.h	1.1" ;
44#endif
45#endif
46
47#define TWO_POWER_FIFTEEN (ushort)32768
48#define RioTime()    riotime
49#define RioTimeAfter(time1,time2) ((ushort)time1 - (ushort)time2) < TWO_POWER_FIFTEEN
50#define RioTimePlus(time1,time2) ((ushort)time1 + (ushort)time2)
51
52/**************************************
53 * Convert a RIO tick (1/10th second)
54 * into transputer low priority ticks
55 *************************************/
56#define RioTimeToLow(time) (time*(100000 / 64))
57#define RioLowToTime(time) ((time*64)/100000)
58
59#define RIOTENTHSECOND (ushort)1
60#define RIOSECOND (ushort)(RIOTENTHSECOND * 10)
61#endif
62
63/*********** end of file ***********/
64