testClauseAtomBody

abstract fun testClauseAtomBody()

Tests the queries

?- clause(atom(_),Body).

fails on a solver initialized with default built-ins and with and empty theory, producing exception permission_error(access,private_procedure,atom/1).