GH #112: Support "readline STDIN":

This includes "readline(STDIN)".
xsawyerx · May 31, 2022 · d9ab139 · d9ab139
1 parent 45a1f75
commit d9ab139
Show file tree

Hide file tree

Showing 2 changed files with 14 additions and 1 deletion.
diff --git a/lib/Guacamole.pm b/lib/Guacamole.pm
@@ -1125,7 +1125,9 @@ OpKeywordReadExpr             ::= OpKeywordRead OpListKeywordArg
 
 OpKeywordReaddirExpr          ::= OpKeywordReaddir OpUnaryKeywordArg
 
-OpKeywordReadlineExpr         ::= OpKeywordReadline OpUnaryKeywordArg
+OpKeywordReadlineExpr         ::= OpKeywordReadline LParen BuiltinFilehandle RParen
+                                | OpKeywordReadline BuiltinFilehandle
+                                | OpKeywordReadline OpUnaryKeywordArg
                                 | OpKeywordReadline
 
 OpKeywordReadlinkExpr         ::= OpKeywordReadlink OpUnaryKeywordArg

diff --git a/t/Statements/Expressions/OpUnaryKeywordExpr/OpKeywordReadlineExpr.t b/t/Statements/Expressions/OpUnaryKeywordExpr/OpKeywordReadlineExpr.t
@@ -0,0 +1,11 @@
+use strict;
+use warnings;
+use Guacamole::Test;
+
+parses('readline;');
+parses('readline();');
+parses('readline STDIN;');
+parses('readline (STDIN);');
+parses('readline(STDIN);');
+
+done_testing();