special literals

Author: fglock

FEATURE_MATRIX.md

@@ -116,7 +116,7 @@
 - [ ] **`require` operator**: The `require` operator is not yet implemented.
 - [ ] **`use` and `no` statements**: Module imports and version changes via `use` and `no` are missing.
 - [ ] **`__SUB__`**: The `__SUB__` special variable is not yet supported.
-- [ ] **Special literals**: `__FILE__`, `__LINE__` not yet supported.
+- [x] **Special literals**: `__FILE__`, `__LINE__`
 - [ ] **`BEGIN` block**: `BEGIN` blocks are missing.
 - [ ] **Labels**: Labels and their usage are not supported.
 - [ ] **Search for labels in call stack**: Label searching in the call stack is missing.

src/main/java/org/perlonjava/codegen/EmitterVisitor.java

@@ -517,9 +517,6 @@ public void visit(OperatorNode node) throws Exception {
                     listNode.accept(this);
                 }
                 return;
-            case "__PACKAGE__":
-                new StringNode(ctx.symbolTable.getCurrentPackage(), node.tokenIndex).accept(this);
-                return;
             case "$":
             case "@":
             case "%":

src/main/java/org/perlonjava/parser/Parser.java

@@ -581,9 +581,12 @@ private Node parsePrimary() {
                     return new StringNode(token.text, tokenIndex);
                 }
                 switch (token.text) {
+                    case "__LINE__":
+                        return new NumberNode(Integer.toString(ctx.errorUtil.getLineNumber(tokenIndex)), tokenIndex);
+                    case "__FILE__":
+                        return new StringNode(ctx.compilerOptions.fileName, tokenIndex);
                     case "__PACKAGE__":
-                        // this takes no parameters
-                        return new OperatorNode(token.text, null, tokenIndex);
+                        return new StringNode(ctx.symbolTable.getCurrentPackage(), tokenIndex);
                     case "not":
                         // Handle 'not' keyword as a unary operator with an operand
                         operand = parseExpression(getPrecedence(token.text) + 1);