/***************************************
 *                                     *
 * Programm: FileTest Diskfile öffnen  *
 * =================================== *
 *                                     *
 * Autor:  Datum:      Kommentar:      *
 * ------  ----------  ----------      *
 * Wgb     15.07.1988  mit Lesezugriff *
 *                                     *
 ***************************************/

#include <libraries/dos.h>

extern struct DOSLibrary *DOSBase;

char Puffer[80];

main(argc, argv)
int argc;
char *argv[];
   {
   LONG Anzahl;
   LONG Error = 0, IoErr();

   struct FileHandle *Handle, *Open();

   if (argc != 2)
      {
      printf("Es wird genau ein File-Name gebraucht!\n");
      exit(FALSE);
      }

   Handle = Open(argv[1], MODE_OLDFILE);
   Error  = IoErr();

   if (Handle == NULL)
      {
      printf("Es ist ein Fehler beim Öffnen aufgetreten!\n");
      printf("Fehler Nr.: %ld\n", Error);
      exit(Error);
      }

   Anzahl = Read(Handle, Puffer, 79L);

   printf(Puffer);

   Close(Handle);
   }