suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add missing pure functions.

Browse Source
This commit is contained in:
Eric Dobson 2013-02-06 23:40:31 -08:00 committed by Vincent St-Amour
parent 19241c0979
commit 40a9794c8f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/typed-racket/optimizer/dead-code.rkt
View File

@ -11,7 +11,7 @@
(define-syntax-class predicate (define-syntax-class predicate
#:literals (flvector? fxvector? exact-integer? fixnum? flonum? vector? string? bytes?) #:literals (flvector? fxvector? exact-integer? fixnum? flonum? vector? string? bytes?)
[pattern (~and x:id (~or flvector? exact-integer? fixnum? flonum? vector? fxvector?))]) [pattern (~and x:id (~or flvector? fxvector? exact-integer? fixnum? flonum? vector? string? bytes?))])
(define (pure? stx) (define (pure? stx)
(syntax-parse stx (syntax-parse stx