Skip to content

Commit

Permalink
Perlito5 - TODO - update
Browse files Browse the repository at this point in the history
  • Loading branch information
fglock committed May 23, 2014
1 parent 493e35f commit 1c44abc
Show file tree
Hide file tree
Showing 2 changed files with 3 additions and 14 deletions.
13 changes: 1 addition & 12 deletions TODO-perlito5
Original file line number Diff line number Diff line change
Expand Up @@ -479,7 +479,7 @@ TODO list for Perlito5
See: p5str_inc()

-- finish "overload" implementation
See: s5str
See: p5str

-- pack(), unpack()
-- y()()
Expand Down Expand Up @@ -509,17 +509,6 @@ TODO list for Perlito5
-- flip-flop operator
if either operand to scalar '..' is a constant the value is implicitly compared to the input line number ($.)

-- unary minus on strings.

my $_ = "a"
print -$_
# -a

my $foo = '-bar';
print $foo;
print -$foo;
# -bar+bar


* Nice to Have

Expand Down
4 changes: 2 additions & 2 deletions t5/01-perlito/050-string.t
Original file line number Diff line number Diff line change
Expand Up @@ -143,7 +143,7 @@ $r = --$v;
print 'not ' if $r ne '-6'; say "ok 31 - string decrement - $r";
print 'not ' if $v ne '-6'; say "ok 32 - string decrement - $v";

# negative
# unary minus

$v = 'AZ';
$r = -$v;
Expand Down Expand Up @@ -215,7 +215,7 @@ print 'not ' unless $r eq '0.12' || $r eq '+00.12';
say "ok 49 - string negative - $r";


# positive
# unary plus

$v = 'AZ';
$r = +$v;
Expand Down

0 comments on commit 1c44abc

Please sign in to comment.