compiler/clib/labs.c

   1 /*
   2     Copyright © 1995-2012, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     C99 function labs().
   6 */
   7
   8 /*****************************************************************************
   9
  10     NAME */
  11 #include <stdlib.h>
  12
  13         long labs (
  14
  15 /*  SYNOPSIS */
  16         long j)
  17
  18 /*  FUNCTION
  19         Compute the absolute value of j.
  20
  21     INPUTS
  22         j - A signed long
  23
  24     RESULT
  25         The absolute value of j.
  26
  27     NOTES
  28
  29     EXAMPLE
  30         // returns 1
  31         labs (1L);
  32
  33         // returns 1
  34         labs (-1L);
  35
  36     BUGS
  37
  38     SEE ALSO
  39         abs(), fabs()
  40
  41     INTERNALS
  42
  43 ******************************************************************************/
  44 {
  45     return (j < 0) ? -j : j;
  46 } /* labs */
  47