/**
* tests listSubjectsWithProperty()
*/
function testlistSubjectsWithPropertyTest()
{
$_SESSION['test'] = 'ResModel listSubjectsWithProperty test';
$model1 = new MemModel();
$needle = new Statement(new Resource('http://www.example.org/needle'), new Resource('http://www.example.org/pred'), new Resource('http://www.example.org/ob'));
$model1->add($needle);
$resmodel = new ResModel($model1);
$resresource = $resmodel->createResource('http://www.example.org/testresource');
$prop = $resmodel->createProperty('http://www.example.org/pred');
$resresource->addProperty($prop, new ResLiteral('Object'));
$property = new ResResource('http://www.example.org/pred');
$res = $resmodel->listSubjectsWithProperty($property);
$this->assertEqual(1, count($res));
$model1->close();
}
