needs lib/struct drv/pc/ioport
unit drv/pc/acpi

\ For now, it's just a place to send a hardcoded shutdown for QEMU...
: bye $2000 $604 pw! ;

: scanrsdp ( -- a-or-0 )
  n" DSR" $e0000 $8000 idx if 4* $e0000 + else 0 then ;