xlist/caret-identifier.rkt
2016-09-21 04:30:39 +02:00

11 lines
197 B
Racket

#lang racket/base
(provide ^)
(require (for-syntax racket/base))
(define-syntax ^
(λ (stx)
(raise-syntax-error
'^
"The ^ identifier can only be used in some contexts"
stx)))