(let ((elf (elf/new!)))
  (print! elf)
  (elf/write-header! elf
    :type elf/TYPE_EXEC
    :machine elf/MACHINE_AMD64)
  (elf/spit! "test.elf" elf)
  )