From 7871f7d6212e64e806acf59118f6e8478e027c8d Mon Sep 17 00:00:00 2001 From: Danny Yoo Date: Tue, 10 May 2011 14:52:20 -0400 Subject: [PATCH] changed test so it's less sensitive to what happens with raco make --- test-parse-bytecode-5.1.1.rkt | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/test-parse-bytecode-5.1.1.rkt b/test-parse-bytecode-5.1.1.rkt index a7d6fde..0a58abe 100644 --- a/test-parse-bytecode-5.1.1.rkt +++ b/test-parse-bytecode-5.1.1.rkt @@ -266,7 +266,7 @@ (begin (reset-lam-label-counter!/unit-testing) (check-true (match (run-my-parse #'(case-lambda)) [(struct Top ((struct Prefix (list)) - (struct CaseLam ((? LamPositionalName?) (list) 'lamEntry1)))) + (struct CaseLam (_ (list) 'lamEntry1)))) #t]))) (begin (reset-lam-label-counter!/unit-testing) @@ -274,20 +274,20 @@ [(x y) x] [(x y) y])) [(struct Top ((struct Prefix (list)) - (struct CaseLam ((? LamPositionalName?) - (list (struct Lam ((? LamPositionalName?) + (struct CaseLam (_ + (list (struct Lam (_ 1 #f (struct LocalRef ('0 '#f)) '() 'lamEntry2)) - (struct Lam ((? LamPositionalName?) + (struct Lam (_ 2 #f (struct LocalRef ('0 '#f)) '() 'lamEntry3)) - (struct Lam ((? LamPositionalName?) + (struct Lam (_ 2 #f (struct LocalRef ('1 '#f))