OpenDylan's <byte-vector> bug

byte-vector-test.dylan

module: byte-vector-test

define library byte-vector-test
  use common-dylan;
  use io;
end library;

define module byte-vector-test
  use common-dylan, exclude: { format-to-string };
  use byte-vector;
  use format-out;
end module;

define function main (name :: <string>, arguments :: <vector>)
  let v = make(<byte-vector>, size: 1, fill: 1);
  format-out("%=\n", v[0]);
  exit-application(0);
end function main;

main(application-name(), application-arguments());