(For h [{[LIT_CHARS bcpc-] [LIT_LBRACE "{"] [LIT_CHARS bootstrap] [LIT_COMMA ","] [LIT_CHARS vm] [LIT_LBRACE "{"] [LIT_CHARS 1..3] [LIT_RBRACE "}"] [LIT_RBRACE "}"]}])
  (Com {[LIT_CHARS VBoxManage]} {[LIT_CHARS startvm]} {[LIT_CHARS --type]} {[LIT_CHARS headless]} {[VarSub h]})
)