anchor.diff:     FALSE
   ;
   
  -\ load from a bootable partition
  -
  -: load-from-boot-partition ( addr -- size )
  -   load-from-dos-boot-partition dup 0= IF
  -     drop load-from-gpt-prep-partition
  -   THEN
  -   \ More boot partition formats ...
  -;
  -
  -
  -
   \ Extract the boot loader path from a bootinfo.txt file
   \ In: address and length of buffer where the bootinfo.txt has been loaded to.
   \ Out: string address and length of the boot loader (within the input buffer)
  
positive.code: ;
  
  : load-from-gpt-prep-partition ( addr -- size )
     no-gpt? IF FALSE EXIT THEN
     debug-disk-label? IF
        cr ." GPT partition found " cr
     THEN
  
     1 read-sector block gpt>part-entry-lba l@-le
     block-size * to seek-pos
     block gpt>part-entry-size l@-le to gpt-part-size
  
negative.code: \ NOTE: block-size is always 512 bytes for DOS partition tables.
  
  : load-from-dos-boot-partition ( addr -- size )
     no-mbr? IF drop FALSE EXIT THEN  \ read MBR and check for DOS disk-label magic
  
     count-dos-logical-partitions TO dos-logical-partitions
  
  