sketch

gistfile1.txt

#lang racket/base
  
(define-namespace-anchor a)

(define (load-plug-in file)
  (let ([ns (namespace-anchor->namespace a)])
    (parameterize ([current-namespace ns])
      (dynamic-require file 'print-colored))))

(define print-colored
  (cond
    [... 'off ... (load-plug-in ...)]
    [... 'ansi ... (load-plug-in ...)]
    [... 'win32 ... (load-plug-in ...)]))