home *** CD-ROM | disk | FTP | other *** search
/ Acorn User 4 / AUCD4.iso / acorn / riscos / releases / oslib / examples / Examples / p2-099 < prev    next >
Text File  |  1994-03-30  |  223b  |  13 lines
  1. #include "osfscontrol.h"
  2.  
  3. char *fts (int fti)
  4.  
  5. {  static char file_type [9];
  6.  
  7.    osfscontrol_read_file_type (fti,
  8.          (bits *) &file_type [0], (bits *) &file_type [4]);
  9.    file_type [8] = '\0';
  10.  
  11.    return file_type;
  12. }
  13.