git.gag.com Git - fw/sdcc/blob - support/regression/tests/bug-223113.c

   1 /*
   2  *-------------------------------------------------
   3  */
   4    int putch( int Ch )
   5 {
   6     return( Ch );
   7 }
   8  /*
   9   *  *-------------------------------------------------
  10   *  */
  11  int puts( char *Str )
  12 {
  13     char *Ptr;
  14
  15     for( Ptr = Str; *Ptr != '\0'; Ptr++ )
  16      {
  17          putch( *Ptr );
  18      }
  19
  20     return( (Ptr - Str) );
  21 }
  22  /*
  23   *  *--------------------------------------------------
  24   *  */
  25  void main( void )
  26 {
  27     puts( "hello world\n" );
  28 }
  29  /*
  30   *  *----------------------------------------------------
  31   *  */