lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/PPI/Token/Number.pm in javonet-ruby-sdk-2.1.14 vs lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/PPI/Token/Number.pm in javonet-ruby-sdk-2.2.0

- old
+ new

@@ -30,11 +30,11 @@ =cut use strict; use PPI::Token (); -our $VERSION = '1.277'; +our $VERSION = '1.278'; our @ISA = "PPI::Token"; =pod @@ -91,9 +91,12 @@ if ( $char eq 'x' || $char eq 'X' ) { $t->{class} = $t->{token}->set_class( 'Number::Hex' ); return 1; } elsif ( $char eq 'b' || $char eq 'B' ) { $t->{class} = $t->{token}->set_class( 'Number::Binary' ); + return 1; + } elsif ( $char eq 'o' || $char eq 'O' ) { + $t->{class} = $t->{token}->set_class( 'Number::Octal' ); return 1; } elsif ( $char =~ /\d/ ) { # You cannot have 8s and 9s on octals if ( $char eq '8' or $char eq '9' ) { $token->{_error} = "Illegal character in octal number '$char'";