[rx.t] <before> should be a parsefail

git-svn-id: http://svn.pugscode.org/pugs@32077 c213334d-75ef-0310-aa23-eaa082d1ae64
Raku · Aug 21, 2010 · 2562fbd · 2562fbd
1 parent 2d3caf3
commit 2562fbd
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/S05-mass/rx.t b/S05-mass/rx.t
@@ -489,7 +489,7 @@ ok ('abacad' ~~ /<before .d> a./) && matchcheck($/, q/mob: <ad @ 4>/), 'lookahea
 ok 'abacad' !~~ /<before c> ..../, 'lookahead <before>';
 
 #### <before> .		abcd		n				null <before>
-ok 'abcd' !~~ /<before> ./, 'null <before>';
+eval_dies_ok "'abcd' !~~ /<before> ./", 'null <before>';
 
 #### <!before ..b> aa	aabaaa		/mob: <aa @ 3>/			negated lookahead
 ok ('aabaaa' ~~ /<!before ..b> aa/) && matchcheck($/, q/mob: <aa @ 3>/), 'negated lookahead';