home *** CD-ROM | disk | FTP | other *** search
/ Dream 45 / Amiga_Dream_45.iso / Amiga / Magazine / Dossier-LaTeX / AmiWeb2C.lha / source / web2c-6.1 / web2c / fontutil / mft.chch < prev    next >
Text File  |  1995-03-26  |  1KB  |  58 lines
  1. Changes for MFT.CH by Andreas Scherer, March 26, 1995.
  2.  
  3. @x l.28
  4. @d banner=='This is MFT, Version 2.0' {more is printed later}
  5. @y
  6. @d banner=='This is MFT, Version 2.0' {more is printed later}
  7.  
  8. @d amiga==ifdef('_AMIGA')
  9. @d agima==endif('_AMIGA')
  10. @z
  11.  
  12. @x l.57
  13. program MFT;
  14. @y
  15. program MFT;
  16.  
  17. amiga@;
  18. @=#include "mft.version";@>
  19. agima@;
  20. @z
  21.  
  22. @x l.484
  23. @<Set up null change file@>=
  24. begin
  25.         change_file_name[1]:='/';
  26.         change_file_name[2]:='d';
  27.         change_file_name[3]:='e';
  28.         change_file_name[4]:='v';
  29.         change_file_name[5]:='/';
  30.         change_file_name[6]:='n';
  31.         change_file_name[7]:='u';
  32.         change_file_name[8]:='l';
  33.         change_file_name[9]:='l';
  34.         change_file_name[10]:=' ';
  35. end
  36. @y
  37. @<Set up null change file@>=
  38. begin
  39.         change_file_name[1]:='/';
  40.         change_file_name[2]:='d';
  41.         change_file_name[3]:='e';
  42.         change_file_name[4]:='v';
  43.         change_file_name[5]:='/';
  44.         change_file_name[6]:='n';
  45.         change_file_name[7]:='u';
  46.         change_file_name[8]:='l';
  47.         change_file_name[9]:='l';
  48.         change_file_name[10]:=' ';
  49. amiga@;
  50.         change_file_name[1]:='N';
  51.         change_file_name[2]:='I';
  52.         change_file_name[3]:='L';
  53.         change_file_name[4]:=':';
  54.         change_file_name[5]:=' ';
  55. agima@;
  56. end
  57. @z
  58.