use dust_lang::*;

#[test]
fn r#while() {
    let source = "let mut x = 0; while x < 5 { x = x + 1 } x";

    assert_eq!(
        parse(source),
        Ok(Chunk::with_data(
            None,
            vec![
                (Instruction::load_constant(0, 0, false), Span(12, 13)),
                (Instruction::define_local(0, 0, true), Span(8, 9)),
                (
                    *Instruction::less(true, 0, 2).set_c_is_constant(),
                    Span(23, 24)
                ),
                (Instruction::jump(2, true), Span(41, 42)),
                (*Instruction::add(0, 0, 3).set_c_is_constant(), Span(39, 40)),
                (Instruction::jump(3, false), Span(41, 42)),
                (Instruction::get_local(1, 0), Span(41, 42)),
                (Instruction::r#return(true), Span(42, 42)),
            ],
            vec![
                Value::integer(0),
                Value::string("x"),
                Value::integer(5),
                Value::integer(1),
            ],
            vec![Local::new(1, None, true, Scope::default(), 0),]
        )),
    );

    assert_eq!(run(source), Ok(Some(Value::integer(5))));
}