Skip to content
Browse files

allow negation of flipflops

  • Loading branch information...
1 parent 082981d commit 8adbc60ac4bce2fda58c74017cb0cbc20d5fcbc0 @TimToady TimToady committed Oct 25, 2013
Showing with 2 additions and 2 deletions.
  1. +2 −2 STD.pm6
View
4 STD.pm6
@@ -128,7 +128,7 @@ constant %structural = (:dba('structural infix'), :prec<n=>, :assoc<non>, :
constant %chaining = (:dba('chaining') , :prec<m=>, :assoc<chain>, :diffy, :iffy, :pure);
constant %tight_and = (:dba('tight and') , :prec<l=>, :assoc<list>);
constant %tight_or = (:dba('tight or') , :prec<k=>, :assoc<list>);
-constant %conditional = (:dba('conditional') , :prec<j=>, :assoc<right>, :fiddly);
+constant %conditional = (:dba('conditional') , :prec<j=>, :assoc<right>, :iffy);
constant %item_assignment = (:dba('item assignment') , :prec<i=>, :assoc<right>, :!pure);
constant %list_assignment = (:dba('list assignment') , :prec<i=>, :assoc<right>, :fiddly, :!pure);
constant %loose_unary = (:dba('loose unary') , :prec<h=>, :assoc<unary>, :uassoc<left>, :pure);
@@ -3938,7 +3938,7 @@ grammar P6 is STD {
|| <?before \N*? [\n\N*?]?> '!!' <.sorry("Bogus code found before the !!")> <.panic("Confused")>
|| <.sorry("Found ?? but no !!")> <.panic("Confused")>
]
- <O(|%conditional, _reducecheck => 'raise_middle')>
+ <O(|%conditional, _reducecheck => 'raise_middle', fiddly => 1, iffy => 0)>
}
token infix:sym<!!> {

0 comments on commit 8adbc60

Please sign in to comment.
Something went wrong with that request. Please try again.