compiler/clib/stco_l.c

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