anchor.diff:  \ If we ever want to put a large kernel with initramfs from a PREP partition
   \ we might need to increase this value. The default value is 65536 blocks (32MB)
   d# 65536 value max-prep-partition-blocks
  +d# 4096 CONSTANT block-array-size
   
   s" disk-label" device-name
   
  
positive.code: 
  : try-partitions ( -- found? )
     try-dos-partition IF try-files EXIT THEN
     \ try-iso9660-partition IF try-files EXIT THEN
     \ ... more partition types here...
     false
  
negative.code: 
  : close ( -- )
     debug-disk-label? IF ." Closing disk-label: block=0x" block u. ." block-size=" block-size .d cr THEN
     block block-array-size free-mem
  ;
  
  
  