Remove syntax-map.
This commit is contained in:
parent
0552411432
commit
4b6c252fb7
|
@ -18,12 +18,6 @@
|
|||
(run-tests
|
||||
(test-suite "syntax.rkt"
|
||||
|
||||
(test-suite "Syntax Lists"
|
||||
|
||||
(test-suite "syntax-map"
|
||||
(test-case "identifiers to symbols"
|
||||
(check-equal? (syntax-map syntax-e #'(a b c)) '(a b c)))))
|
||||
|
||||
(test-suite "Syntax Source Locations"
|
||||
|
||||
(test-suite "syntax-source-file-name"
|
||||
|
|
|
@ -91,15 +91,6 @@ Bounds are inclusive.
|
|||
|
||||
@;{----}
|
||||
|
||||
@addition{@author+email["Sam Tobin-Hochstadt" "samth@racket-lang.org"]}
|
||||
|
||||
@defproc[(syntax-map [f (-> syntax? A)] [stxl syntax?] ...) (listof A)]{
|
||||
Performs @racket[(map f (syntax->list stxl) ...)].
|
||||
|
||||
@examples[#:eval the-eval
|
||||
(syntax-map syntax-e #'(a b c))]
|
||||
}
|
||||
|
||||
@addition{@author+email["Eric Dobson" "eric.n.dobson@gmail.com"]}
|
||||
|
||||
@defproc[(syntax-length [stx syntax?]) exact-nonnegative-integer?]{
|
||||
|
|
|
@ -1,13 +1,10 @@
|
|||
#lang racket/base
|
||||
;; owner: ryanc (and cce and stamourv, where noted)
|
||||
(require racket/syntax
|
||||
syntax/stx
|
||||
(for-syntax racket/base)
|
||||
(for-template racket/base))
|
||||
|
||||
(provide (rename-out [stx-map syntax-map])
|
||||
|
||||
;; by endobson
|
||||
(provide ;; by endobson
|
||||
syntax-length
|
||||
|
||||
;; by cce:
|
||||
|
|
Loading…
Reference in New Issue
Block a user