compiler/clib/stcl_o.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     SAS/C function stcl_o().
   6 */
   7
   8 #include <stdio.h>
   9
  10 /*****************************************************************************
  11
  12     NAME */
  13 #include <string.h>
  14
  15         int stcl_o (
  16
  17 /*  SYNOPSIS */
  18         char            * out,
  19         long        lvalue)
  20
  21 /*  FUNCTION
  22         Convert an long integer to an octal string
  23
  24     INPUTS
  25         out     - Result will be put into this string
  26         uivalue - the value to convert
  27
  28     RESULT
  29         The number of characters written into the string
  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 sprintf(out, "%lo", lvalue);
  45 } /* stcl_o */