testSubAtomTypeErrorBeforeIsNotInteger

Tests the query

?- sub_atom(banana, a, 2, _, S).

fails on a solver initialized with default built-ins and with an empty theory, producing exception type_error(integer, a).