[functional tests] Remove dependency on the ThunderChez library.
I've just moved the relevant code into the functional-tests dir.
This commit is contained in:
18
functional-tests/srfi/private/auxiliary-keyword.sls
Normal file
18
functional-tests/srfi/private/auxiliary-keyword.sls
Normal file
@@ -0,0 +1,18 @@
|
||||
|
||||
#!r6rs
|
||||
(library (srfi private auxiliary-keyword)
|
||||
(export define-auxiliary-keyword define-auxiliary-keywords)
|
||||
(import (scheme))
|
||||
|
||||
(define-syntax define-auxiliary-keyword
|
||||
(syntax-rules ()
|
||||
[(_ name)
|
||||
(define-syntax name
|
||||
(lambda (x)
|
||||
(syntax-violation 'name "misplaced use of auxiliary keyword" x)))]))
|
||||
|
||||
(define-syntax define-auxiliary-keywords
|
||||
(syntax-rules ()
|
||||
[(_ name* ...)
|
||||
(begin (define-auxiliary-keyword name*) ...)])))
|
||||
|
||||
Reference in New Issue
Block a user