transcendental-lisp/test/function/builtin/EVALTester.java

package function.builtin;

import static function.builtin.EVAL.lookupSymbol;
import static org.junit.Assert.*;
import static sexpression.Nil.NIL;
import static testutil.TestUtilities.*;

import org.junit.Test;

import function.ArgumentValidator.*;
import function.builtin.EVAL.*;

public class EVALTester {

    @Test
    public void evalNumber() {
        String input = "(eval 9)";

        assertSExpressionsMatch(parseString("9"), evaluateString(input));
    }

    @Test
    public void evalNil() {
        String input = "(eval ())";

        assertSExpressionsMatch(parseString("()"), evaluateString(input));
    }

    @Test
    public void lookupKeywordSymbol() {
        String symbol = ":symbol";
        assertSExpressionsMatch(parseString(symbol), lookupSymbol(symbol));
    }

    @Test
    public void lookupT() {
        String symbol = "T";
        assertSExpressionsMatch(parseString(symbol), lookupSymbol(symbol));
    }

    @Test
    public void lookupNil() {
        String symbol = "NIL";
        assertSExpressionsMatch(parseString(symbol), lookupSymbol(symbol));
    }

    @Test
    public void lookupUndefinedSymbol() {
        assertNull(EVAL.lookupSymbol("undefined"));
    }

    @Test(expected = UndefinedFunctionException.class)
    public void evalUndefinedFunction() {
        String input = "(funcall 'eval '(undefined))";

        evaluateString(input);
    }

    @Test(expected = UndefinedSymbolException.class)
    public void evalUndefinedSymbol() {
        String input = "(eval undefined)";

        evaluateString(input);
    }

    @Test(expected = DottedArgumentListException.class)
    public void evalWithDottedLambdaList() {
        String input = "(funcall 'eval (cons '+ 1))";

        evaluateString(input);
    }

    @Test(expected = TooManyArgumentsException.class)
    public void evalWithTooManyArguments() {
        evaluateString("(eval '1 '2 '3)");
    }

    @Test(expected = TooFewArgumentsException.class)
    public void evalWithTooFewArguments() {
        evaluateString("(eval)");
    }

    @Test
    public void undefinedFunctionException_HasMessageText() {
        UndefinedFunctionException e = new UndefinedFunctionException(NIL);

        assertNotNull(e.getMessage());
        assertTrue(e.getMessage().length() > 0);
    }

    @Test
    public void undefinedSymbolException_HasMessageText() {
        UndefinedSymbolException e = new UndefinedSymbolException(NIL);

        assertNotNull(e.getMessage());
        assertTrue(e.getMessage().length() > 0);
    }

}