OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.17.0/] [newlib/] [libc/] [stdlib/] [labs.c] - Blame information for rev 308

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 148 jeremybenn
/*
2
FUNCTION
3
<<labs>>---long integer absolute value
4
 
5
INDEX
6
        labs
7
 
8
ANSI_SYNOPSIS
9
        #include <stdlib.h>
10
        long labs(long <[i]>);
11
 
12
TRAD_SYNOPSIS
13
        #include <stdlib.h>
14
        long labs(<[i]>)
15
        long <[i]>;
16
 
17
DESCRIPTION
18
<<labs>> returns
19
@tex
20
$|x|$,
21
@end tex
22
the absolute value of <[i]> (also called the magnitude
23
of <[i]>).  That is, if <[i]> is negative, the result is the opposite
24
of <[i]>, but if <[i]> is nonnegative the result is <[i]>.
25
 
26
The similar function <<abs>> uses and returns <<int>> rather than
27
<<long>> values.
28
 
29
RETURNS
30
The result is a nonnegative long integer.
31
 
32
PORTABILITY
33
<<labs>> is ANSI.
34
 
35
No supporting OS subroutine calls are required.
36
*/
37
 
38
#include <stdlib.h>
39
 
40
long
41
_DEFUN (labs, (x),
42
        long x)
43
{
44
  if (x < 0)
45
    {
46
      x = -x;
47
    }
48
  return x;
49
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.