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

fix broken test

Browse Source
This commit is contained in:
Robby Findler 2013-06-30 05:06:46 -05:00
parent 8d9a859d7a
commit a8731609f1
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pkgs/redex/tests/tl-test.rkt
View File

@ -137,7 +137,7 @@
(define-language L (define-language L
[Cv (name n variable-not-otherwise-mentioned)]) [Cv (name n variable-not-otherwise-mentioned)])
(test (redex-match L Cv (term ())) #f) (test (redex-match L Cv (term ())) #f)
(test (pair? (redex-match L Cv (term x))) #f)) (test (pair? (redex-match L Cv (term x))) #t))
(let () (let ()
(define-language lang (define-language lang