current default error port to @var{port}."
  (current-error-port port))


;;;; high level routines