home *** CD-ROM | disk | FTP | other *** search
/ The C Users' Group Library 1994 August / wc-cdrom-cusersgrouplibrary-1994-08.iso / vol_300 / 328_02 / wputfl.c < prev    next >
C/C++ Source or Header  |  1991-03-25  |  668b  |  36 lines

  1. /* WPUTFL.C - fixed length string put.
  2.  */
  3. #include "wsys.h"
  4.  
  5. void wputfl ( char *s, int l )
  6.     {
  7.     char ch;
  8.     char done =0;
  9.     
  10.     #ifdef __LARGE__
  11.         if ( s==NULL ) s= "";    /* protect against ptr to NULL */
  12.     #endif
  13.     #ifdef __COMPACT__
  14.         if ( s==NULL ) s= "";    /* protect against ptr to NULL */
  15.     #endif
  16.     #ifdef __HUGE__
  17.         if ( s==NULL ) s= "";    /* protect against ptr to NULL */
  18.     #endif
  19.     
  20.     while ( l-- )
  21.         {
  22.         if ( ! done )
  23.             {
  24.             ch = *(s++);        /* get value first, then incr. ptr */
  25.             if ( ch == 0 )
  26.                 {
  27.                 done =1;
  28.                 ch = ' ';
  29.                 }
  30.             }
  31.         wputc ( ch );
  32.         }
  33.     
  34.     return;        /* wputfl() */    
  35.     }
  36. /*---------------- WPUTFL.C -----------------*/