test :: () -> void {
  putc 'h';
  putc 'e';
  putc 'y';
};