On Sat Jun 27 08:16:45 2015, equinox wrote: > > Hi, > > see > > https://gist.github.com/jaffa4/11847e6d373f9ddfba34 > > > Execute it > perl6-m.bat Long.pm6 > > You will get > > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1021 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1026 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1027 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1029 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1036 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1041 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1043 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1052 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1054 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1055 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1060 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1064 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1066 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1084 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1086 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1111 > here D:\m\p6\getopt_LONG\lib\Getopt\Long.pm6: 1113 > > > There should a be 1122.. line too it fails before that silently. > It seems to fail because of reverse ifs.. > > > print STDERR ("=> found ", OptCtl($ctl), > " for \"", $opt, "\"\n") if $debug; > > > if I change this if... (refactor so that if is in front) more is printed > .... > > These are tracing statements. > > Jaffa4 > >
When I run this with rakudo latest, I get a note at 1122, so I can't duplicate the original issue. There are a lot of warnings that occur -after- that, but the original issue is closed. In future, please try to provide a small reproducible test case so we can adapt it to roast. Closing ticket. -- Will "Coke" Coleda