Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

"is equiv" does not recognize some operators #3224

Closed
p6rt opened this issue Sep 4, 2013 · 5 comments
Closed

"is equiv" does not recognize some operators #3224

p6rt opened this issue Sep 4, 2013 · 5 comments
Labels
Bug

Comments

@p6rt
Copy link

@p6rt p6rt commented Sep 4, 2013

Migrated from rt.perl.org#119589 (status was 'rejected')

Searchable as RT119589$

@p6rt
Copy link
Author

@p6rt p6rt commented Sep 4, 2013

From timk@jtimothyking.com

<TimK1> rn​: sub infix​:<add> (@​a, $n) is equiv(&infix​:<X>) { @​a <<+>>
$n }; say 1 .. 3 add 5;
<camelia> niecza v24-92-g3961d5d​: OUTPUT«6 7 8␤»
<camelia> ..rakudo 484f08​: OUTPUT«�[31m===�[0mSORRY!�[31m===�[0m Error
while compiling /tmp/J6R82sHIP7␤Routine given to equiv does not appear
to be an operator␤at /tmp/J6R82sHIP7​:1␤------> ␤»
<TimK1> rn​: sub infix​:<add> (@​a, $n) is equiv(&infix​:<+>) { @​a <<+>>
$n }; say (1 .. 3) add 5; # definitely not what I wanted
<camelia> rakudo 484f08, niecza v24-92-g3961d5d​: OUTPUT«6 7 8␤»

@p6rt
Copy link
Author

@p6rt p6rt commented Jan 3, 2015

From @usev6

On Tue Sep 03 17​:37​:18 2013, timk wrote​:

<TimK1> rn​: sub infix​:<add> (@​a, $n) is equiv(&infix​:<X>) { @​a <<+>>
$n }; say 1 .. 3 add 5;
<camelia> niecza v24-92-g3961d5d​: OUTPUT«6 7 8␤»
<camelia> ..rakudo 484f08​: OUTPUT«�[31m===�[0mSORRY!�[31m===�[0m Error
while compiling /tmp/J6R82sHIP7␤Routine given to equiv does not appear
to be an operator␤at /tmp/J6R82sHIP7​:1␤------> ␤»
<TimK1> rn​: sub infix​:<add> (@​a, $n) is equiv(&infix​:<+>) { @​a <<+>>
$n }; say (1 .. 3) add 5; # definitely not what I wanted
<camelia> rakudo 484f08, niecza v24-92-g3961d5d​: OUTPUT«6 7 8␤»

Hi,

currently both commands give the same result​:

$ perl6 -e 'sub infix​:<add> (@​a, $n) is equiv(&infix​:<X>) { @​a <<+>> $n }; say 1 .. 3 add 5;'
6 7 8

$ perl6-m -e 'sub infix​:<add> (@​a, $n) is equiv(&infix​:<X>) { @​a <<+>> $n }; say (1 .. 3) add 5;'
6 7 8

What result did you expect? (esp. I don't understand your comment '# definitely not what I wanted' after the second command.)

Christian

@p6rt
Copy link
Author

@p6rt p6rt commented Jan 3, 2015

The RT System itself - Status changed from 'new' to 'open'

@p6rt
Copy link
Author

@p6rt p6rt commented May 21, 2016

From @smls

I agree with bartolin​: From what I can tell, it works as it should.

Closing the ticket.

@p6rt
Copy link
Author

@p6rt p6rt commented May 21, 2016

@smls - Status changed from 'open' to 'rejected'

@p6rt p6rt closed this May 21, 2016
@p6rt p6rt added the Bug label Jan 5, 2020
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Projects
None yet
Linked pull requests

Successfully merging a pull request may close this issue.

None yet
1 participant