Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Perlito5 - TODO update

  • Loading branch information...
commit 8f60cb4efff8e455f3633a43790f4e347b4240fc 1 parent b7bb606
@fglock authored
Showing with 12 additions and 6 deletions.
  1. +10 −6 TODO-perlito5
  2. +2 −0  src5/util/perlito5.pl
View
16 TODO-perlito5
@@ -3,7 +3,6 @@ TODO list for Perlito5
* perlito5 command-line
--- process the arguments in a loop; ignore argument order
-- search for modules in PERL5LIB
perlito5 own directories must be searched first (perlito5 defines it's own strict.pm)
maybe search PERLITO5LIB first
@@ -42,9 +41,14 @@ TODO list for Perlito5
* Parser
-- bug: filetest operators special case:
- -f($file).".bak" should be equivalent to -f "$file.bak"
+ ' -f($file).".bak" ' should be equivalent to -f "$file.bak"
+ parses as -(f($file)).".bak"
+ but: ' -f ($file).".bak" '
+ parses correctly
--- '$#' should be a syntax error (parses as $#{undef} )
+-- ' 123 456 ' should be a syntax error (parses as two statements)
+-- ' $# ' should be a syntax error (parses as $#{undef} )
+-- ' $x->meth 123 ' should be a syntax error
-- fix the prototype for 'stat(*)' (see t/test.pl in the perl test suite)
@@ -72,8 +76,6 @@ TODO list for Perlito5
$ node perlito5.js -Bjs -e ' my $x = "123"; my $y = \$x; print "[$$y]\n" '
[$[object Object]]
--- this should give a syntax error: $x->meth 123
-
-- indirect object notation
method Module $param;
-- lookup for existing subroutines:
@@ -160,7 +162,9 @@ TODO list for Perlito5
* Nice to Have
--- labels, "next", "last", "continue"
+-- "next", "last", "continue"
+-- caller()
+-- "when"
-- run more of the "perl" test suite
View
2  src5/util/perlito5.pl
@@ -148,6 +148,7 @@ package Perlito;
}
}
else {
+ # call the "ahead of time" compiler
# since we are generating code that will run from scratch,
# we need to start with an empty %INC so that all modules are "used"
@@ -172,6 +173,7 @@ package Perlito;
)
|| "Unknown error";
warn $error;
+ exit(255);
}
else {
my $comp_units;
Please sign in to comment.
Something went wrong with that request. Please try again.