lang/paramz.rkt
#lang racket/base

(require (for-syntax racket/base))

;; provide-stub-parameter
(define-syntax (provide-stub-parameter stx)
  (syntax-case stx ()
    [(_ name ...)
     (syntax/loc stx
       (begin (begin (define (name . args) 
                       'this-is-a-stub)
                     (provide name))
              ...))]))


(provide-stub-parameter exception-handler-key)