0.9.514

- EVAL Fix
PseudoLang-Software-Foundation · Dec 7, 2024 · 230090f · 230090f
1 parent 09b5b6c
commit 230090f
Show file tree

Hide file tree

Showing 2 changed files with 25 additions and 0 deletions.
diff --git a/src/parser.rs b/src/parser.rs
@@ -353,6 +353,17 @@ impl Parser {
                 }
                 Ok(AstNode::Input(prompt))
             }
+            Some(Token::Eval) => {
+                self.advance();
+                if !self.match_token(&Token::OpenParen) {
+                    return Err("Expected '(' after 'EVAL'".to_string());
+                }
+                let expr = self.parse_expression(debug)?;
+                if !self.match_token(&Token::CloseParen) {
+                    return Err("Expected ')' after expression in 'EVAL'".to_string());
+                }
+                Ok(AstNode::Eval(Box::new(expr)))
+            }
             _ => {
                 Self::debug_print(
                     debug,

diff --git a/src/tests/mod.rs b/src/tests/mod.rs
@@ -2461,6 +2461,20 @@ DISPLAY(arr)"#,
             "4",
         );
 
+        assert_output(
+            r#"
+        expression <- "x* (x+1)*(x+2)"
+        x <- 3
+        DISPLAY(EVAL(expression))"#,
+            "60",
+        );
+
+        assert_output(
+            r#"x <- 4
+        DISPLAY(TOSTRING(EVAL("x=3")) + " " + TOSTRING(EVAL("x = 4")))"#,
+            "false true",
+        );
+
         assert_output(
             r#"
             x <- 10