On 11/4/19 3:42 AM, Tom Browder wrote:
On Mon, Nov 4, 2019 at 04:44 ToddAndMargo via perl6-users
<perl6-users@perl.org> wrote:
...
Todd, please don't be so careless in what you show us. It's difficult
to zero in on your problem. Do me a favor and go to a clean, empty
directory somewhere named 'mytest', and create EXACTLY what I describe
here:
+ create a sub-directory named 'lib'
+ in the sub-directory create two files named 'A.pm6' and 'B.pm6'
+ the contents of 'A.pm6':
unit module A;
sub A is export(:A) { say "A" }
sub B is export(:B) { say "B" }
+ the contents of 'B.pm6':
unit module B;
sub A is export(:A) { say "A" }
sub B is export(:B) { say "B" }
+ back in directory 'mytest' run the following command
and you should get the same results I do: a single 'A'.
$ perl6 -e 'use lib <lib>; use A :A; A'
A
Please show EXACTLY your command and the results, with no other
comment (and please DON'T TOP POST).
And do not make ANY changes to the test setup described above until I
ask you to.
-Tom
Hi Tom,
If you ever catch me top posting, please dope slap me!
Here you go.
Thank you for the h elp!
-T
# mkdir -p mytest/lib
# cd mytest
[root@rn6 mytest]# ls -aF lib
./ ../ A.pm6 B.pm6
# cat lib/A.pm6
unit module A;
sub A is export(:A) { say "A" }
sub B is export(:B) { say "B" }
# cat lib/B.pm6
unit module B;
sub A is export(:A) { say "A" }
sub B is export(:B) { say "B" }
[root@rn6 mytest]# perl6 -e 'use lib <lib>; use A :A; A'
WARNINGS for -e:
Useless use of constant value A in sink context (line 1)
[root@rn6 mytest]# ls -aF lib
./ ../ A.pm6 B.pm6 .precomp/
