(define-structure vm
  (export kmain keyboard-handler
          )
  (open prescheme ps-memory ps-receive ps-macros (modify terminal (prefix terminal:)))
  (for-syntax (open scheme bitwise))
  (files ev))

(define-structure ps-macros
  (export cond-expand)
  (open prescheme)
  (files ps-macros))

(define-structure terminal
  (export initialize put-number put-char)
  (open prescheme ps-memory)
  (files terminal))