From 8ac38f4a3a2e5a8dedbefe4f48980b953e200016 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Georges=20Dup=C3=A9ron?= Date: Mon, 19 Sep 2016 20:47:01 +0200 Subject: [PATCH] Fixed tests and missing dependency --- info.rkt | 3 ++- test/test-global.rkt | 6 +++--- 2 files changed, 5 insertions(+), 4 deletions(-) diff --git a/info.rkt b/info.rkt index 35ade40..2abc171 100644 --- a/info.rkt +++ b/info.rkt @@ -3,7 +3,8 @@ (define deps '("base" "rackunit-lib" "phc-toolkit" - "generic-syntax-expanders")) + "generic-syntax-expanders" + "alexis-util")) (define build-deps '("scribble-lib" "racket-doc" "seq-no-order")) diff --git a/test/test-global.rkt b/test/test-global.rkt index 661c894..53a4a6d 100644 --- a/test/test-global.rkt +++ b/test/test-global.rkt @@ -61,7 +61,7 @@ (attribute kw-not-number)]) #t) -;; Tests from the documentation: +;; former tests from the documentation: (check-equal? (syntax-parse #'(1 ya (2 #f 3) 4 yb (5 #f 6) yc 7) @@ -71,7 +71,7 @@ …) {~global-or [g (syntax-e #'w)] w:str}) (attribute g)]) - 'ya) + #t) (check-equal? (syntax-parse #'(1 ya (2 3) 4 yb (5 6) yc 7) @@ -81,4 +81,4 @@ …) {~global-and [g (syntax-e #'w)] w:str}) (attribute g)]) - 6) \ No newline at end of file + #t) \ No newline at end of file