DEFINITION MODULE BootBlock; (*$ Implementation:=FALSE *)
(* 02-Feb-1992/cn *)

FROM SYSTEM IMPORT CAST;

TYPE
  BootBlock=RECORD
    id:ARRAY [0..3] OF CHAR;
    chkSum:LONGINT;
    dosBlock:LONGINT;
  END;

CONST
  bootSects=2;
  idDos='DOS\o';
  idKick='KICK';
  nameDos=CAST(LONGINT,idDos);
  nameKick=CAST(LONGINT,idKick);

END BootBlock.noimp
