pascal 0.1.8

A modern Pascal compiler with build/intepreter/package manager built with Rust
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30

//! Main validation tests for Pascal compiler

#[cfg(test)]
mod main_validation {
    use pascal::parser::Parser;
    use pascal::interpreter::Interpreter;

    #[test]
    pub fn test_backward_compatibility() {
        let old_style_code = r#"
        program OldStyle;
        var
          i: integer;
        begin
          for i := 1 to 10 do
            writeln(i);
        end.
        "#;

        let mut parser = Parser::new(old_style_code);
        let program = parser.parse_program();
        assert!(program.is_ok());

        let mut interpreter = Interpreter::new(false);
        let result = interpreter.run_program(&program.unwrap());
        assert!(result.is_ok());

        println!("  ✓ Backward compatibility validation passed");
    }
}