13 lines
419 B
Racket
13 lines
419 B
Racket
#lang racket/base
|
|
(#%require version-case
|
|
(for-syntax (only racket/base version)
|
|
(only racket/base #%app #%datum))
|
|
stxparse-info/my-include)
|
|
(version-case
|
|
[(version< (version) "6.11.0.900")
|
|
(my-include "stxcase-scheme.rkt-6-11")]
|
|
[(version< (version) "6.90.0.29")
|
|
(my-include "stxcase-scheme.rkt-6-11")]
|
|
[else
|
|
(my-include "stxcase-scheme.rkt-6-90-0-29")])
|