ok(!Class::MOP::is_class_loaded('BinaryTree'), '... the binary tree class is not loaded');
-ok ! exception {
+is( exception {
Class::MOP::load_class('BinaryTree');
-}, '... loaded the BinaryTree class without dying';
+}, undef, '... loaded the BinaryTree class without dying' );
ok(Class::MOP::is_class_loaded('BinaryTree'), '... the binary tree class is now loaded');