nickel/tests/stdlib_arrays_fail.rs

use assert_matches::assert_matches;
use nickel_lang::error::{Error, EvalError};

use nickel_lang_utilities::eval;

#[test]
fn elem_at() {
    assert_matches!(
        eval("%elem_at% [] 0"),
        Err(Error::EvalError(EvalError::Other(..)))
    );
    assert_matches!(
        eval("%elem_at% [1,2,3] (-1)"),
        Err(Error::EvalError(EvalError::Other(..)))
    );
    assert_matches!(
        eval("%elem_at% [true, false, true] 3"),
        Err(Error::EvalError(EvalError::Other(..)))
    );
    assert_matches!(
        eval("%elem_at% {} 0"),
        Err(Error::EvalError(EvalError::TypeError(..)))
    );
    assert_matches!(
        eval("%elem_at% [1, 2, 3] 0.5"),
        Err(Error::EvalError(EvalError::Other(..)))
    );

    assert_matches!(
        eval("array.elem_at 0 {} 0"),
        Err(Error::EvalError(EvalError::BlameError(..)))
    );
    assert_matches!(
        eval("array.elem_at \"a\" []"),
        Err(Error::EvalError(EvalError::BlameError(..)))
    );
}

#[test]
fn head_tail() {
    assert_matches!(
        eval("%head% []"),
        Err(Error::EvalError(EvalError::Other(..)))
    );
    assert_matches!(
        eval("%tail% []"),
        Err(Error::EvalError(EvalError::Other(..)))
    );
    assert_matches!(
        eval("%head% {}"),
        Err(Error::EvalError(EvalError::TypeError(..)))
    );
    assert_matches!(
        eval("%tail% {}"),
        Err(Error::EvalError(EvalError::TypeError(..)))
    );

    // TODO: add non-empty contract to the input of array.head and array.tail
    // assert_matches!(
    //     eval("array.head []"),
    //     Err(Error::EvalError(EvalError::BlameError(..)))
    // );
    // assert_matches!(
    //     eval("array.tail []"),
    //     Err(Error::EvalError(EvalError::BlameError(..)))
    // );
    assert_matches!(
        eval("array.head false"),
        Err(Error::EvalError(EvalError::BlameError(..)))
    );
    assert_matches!(
        eval("array.tail 2"),
        Err(Error::EvalError(EvalError::BlameError(..)))
    );
}