#lang br
(provide current-basic-port)
(define current-basic-port (make-parameter #f))