compiler/stdc/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 <stdlib.h>
   9
  10 /*****************************************************************************
  11
  12     NAME */
  13 #include <string.h>
  14
  15         int stch_l (
  16
  17 /*  SYNOPSIS */
  18         const char      * in,
  19         long            * lvalue)
  20
  21 /*  FUNCTION
  22         Convert hexadecimal string to a long integer
  23
  24     INPUTS
  25         in     - The hexadecimal string to be converted
  26         lvalue - Pointer to long where the result is saved
  27
  28     RESULT
  29         Number of characters converted
  30
  31     NOTES
  32         SAS/C specific
  33
  34     EXAMPLE
  35
  36     BUGS
  37
  38     SEE ALSO
  39
  40     INTERNALS
  41
  42 ******************************************************************************/
  43 {
  44     char *endptr;
  45
  46     *lvalue = strtoul(in, &endptr, 16);
  47
  48     return endptr - in;
  49
  50 } /* stch_l */