home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / OBJASM.ZIP / ORTHEADR.C < prev    next >
Text File  |  1989-05-24  |  397b  |  22 lines
  1. #include <stdio.h>
  2. #include "o.h"
  3.  
  4. void theadr()
  5. {
  6.     int     length;
  7.     char    mod_name[41];
  8.     char    mod_temp[43];
  9.  
  10.     length = get_name( mod_name );
  11.  
  12.     if ( compatibility == 2 ) {
  13.         sprintf( mod_temp, "'%s'", mod_name );
  14.         out_line( "", "TITLE", mod_temp, "" );
  15.     } else {
  16.         out_line( "", "TITLE", mod_name, "" );
  17.     }
  18.     out_newline();
  19. }
  20.  
  21. 
  22.