summaryrefslogtreecommitdiff
path: root/support/dktools/dk4macl.ctr
blob: 6de05cf88637ff44f4f42cba18f4965a2ba9ff52 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
%%	options

copyright owner	=	Dirk Krause
copyright year	=	2015-xxxx
license		=	bsd



%%	header

/**	@file
	Comparison between signed and unsigned
	long.
*/

#ifdef __cplusplus
extern "C" {
#endif

/**	Compare signed and unsigned long.
	@param	s	Signed long.
	@param	u	Unsigned long.
	@return	1 if s>u, 0 if s==u, -1 if s<u.
*/
int
dk4ma_long_compare(long s, unsigned long u);

#ifdef __cplusplus
}
#endif



%%	module

#include "dk4macl.h"

int
dk4ma_long_compare(long s, unsigned long u)
{
  int	back	=	0;
  if (0L > s) {
    back = -1;
  } else {
    if ((unsigned long)s < u) {
      back = -1;
    } else {
      if ((unsigned long)s > u) {
        back = 1;
      }
    }
  }
  return back;
}