workbench/libs/asyncio/src/WriteLineAsync.c

   1 #include "async.h"
   2
   3
   4 _CALL LONG
   5 WriteLineAsync( _REG( a0 ) AsyncFile *file, _REG( a1 ) STRPTR line )
   6 {
   7         /* Since SAS/C have an inlined strlen... */
   8 #if defined( NOEXTERNALS ) && !defined( __SAS )
   9         LONG    i = 0;
  10         STRPTR  s = line;
  11
  12         while( *s )
  13         {
  14                 ++i, ++s;
  15         }
  16
  17         return( WriteAsync( file, line, i ) );
  18 #else
  19         return( WriteAsync( file, line, strlen( line ) ) );
  20 #endif
  21 }