# New Ticket Created by "Brian S. Julin"
# Please include the string: [perl #132010]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=132010 >
Please combine RT #124544 #124545 #124546 and #124547 into this bug.
They are autogenerated per-test bugs for an unimplemented feature.
The S metaoperator has been unimplemented since pre-nom days.
Also some of the tests in S03-operators/also.t are dubious, since
a block object inside an expression is not called.
$ perl6 -e '(1 & { 42.say }).say'
all(1, -> ;; $_? is raw { #`(Block|93970534783312) ... })
The S metaoperator does still have syntax hooks, but does not even
work as a noop... any passing tests in this file pass by accident:
$ perl6 -e '(1 S& 2).perl.say; (?(all())).say'
all()
True
