compiler/clib/stch_l.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     SAS C function stch_l().
   6 */
   7
   8 #include <stdio.h>
   9 #include <stdlib.h>
  10
  11 /*****************************************************************************
  12
  13     NAME */
  14 #include <string.h>
  15
  16         int stch_l (
  17
  18 /*  SYNOPSIS */
  19         const char      * in,
  20         long            * lvalue)
  21
  22 /*  FUNCTION
  23         Convert hexadecimal string to a long integer
  24
  25     INPUTS
  26         in     - The hexadecimal string to be converted
  27         lvalue - Pointer to long where the result is saved
  28
  29     RESULT
  30         Number of characters converted
  31
  32     NOTES
  33         SAS C specific
  34
  35     EXAMPLE
  36
  37     BUGS
  38
  39     SEE ALSO
  40
  41     INTERNALS
  42
  43 ******************************************************************************/
  44 {
  45     char *endptr;
  46
  47     *lvalue = strtoul(in, &endptr, 16);
  48
  49     return endptr - in;
  50
  51 } /* stch_l */